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FOREWORD 


This document was prepared for the Johnson Space 
Center, Houston, Texas, under contract NAS 9-13864. 
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INTRODUCTION 


HAL/S is a programming language developed by Intermetrics, Inc. 
for the flight software of the NASA Space Shuttle program. 

HAL/.S is intended to satisfy virtually all of the flight 
software requirements of the Space Shuttle. To achieve this, 
HAL/S incorporates a wide range of features, including appli- 
cations-oriented data types and organizations, real time 
control mechanisms, and constructs for systems programming 
tasks . 

As the name indicates, HAL/S is a dialect of the original 
HAL language previously developed by Intermetrics t 1 J . 

Changes have been incorporated to simplify syntax, curb 
excessive generality, or facilitate flight code emission. 


REVIEW OF THE LANGUAGE 

HAL/S is a higher order language designed to allow programmers, 
analysts, and engineers to communicate with the computer in a 
form approximating natural mathematical expression. Par.ts of 
the English language are combined with standard notation to 
provide a tool that readily encourages programming without 
demanding computer hardware expertise. 

HAL/S compilers accept two formats of the source text, the 
usual single line format, and also a multi-line format corres- 
ponding to the natural notation of ordinary algebra. 


DATA TYPES AND COMPUTATIONS 

HAL/S provides facilities for manipulating a number of different 
data types. Its integer, scalar, vector, and matrix types, 
together with the appropriate operators and built-in functions 
provide an extremely powerful tool for the implementation of 
guidance and control algorithms. Bit and character types are 
also incorporated. 

HAL/S permits the formation of multi-dimensional arrays of 
homogeneous data types, and of tree-like structures which 
are organisations of non-homogeneous data types. 
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REAL TIME CONTROL 

HAL/S is a real time control language. Defined blocks of 
code called programs and tasks can be scheduled for execu- 
tion in a variety of different ways. A wide range of commands 
for controlling their execution is also provided including 
mechanisms for interfacing with external interrupts and other 
environmental conditions. 


ERROR RECOVERY 

HAL/S contains an elaborate run time error recovery facility 
which allows the programmer freedom (within the constraints 
of safety) to define his own error processing procedures, or 
to leave control with the operating system. 


SYSTEM LANGUAGE 

HAL/S contains a number of features especially designed to 
facilitate its application to systems programming. Thus, 
it substantially eliminates the necessity of using an 
assembler language. 


PROGRAM RELIABILITY 

Program reliability is enhanced when software can, by its • 

design, create effective isolation between various sections I 

of code, while maintaining ease of access to commonly used ' 

data. HAL/S is a block oriented language in that blocks 

of code may be established with locally defined variables that » 

are not visible from outside the block. Separately compiled I 

program blocks can be executed together and communicate through 

one or more centrally managed and highly visible data pools. , 

In a reel time environment, HAL/S couples these precautions with j 

locking mechanisms preventing the uncontrolled usage of sensitive 

data or areas of code. 

i 

f 

I 
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ABOUT THE PROGRAMMER'S GUIDE 


The Programmer's Guide presents, an informal description 
of the HAL/S Language to the potential HAL/S programmer. 

It is in no way meant to be an exhaustive catalog of all 
the various rules of the language. That is the function 
of the HAL/S Language Specification Document. However, 
after the HAL/S programmer has absorbed the material 
presented here, he should have been able to gain enough 
insight into the workings of the language to enable him 
to use the Language Specification to clarify any ambiguities. 

In order to execute a HAL/S program on any given machine, the 
programmer will need information contained in the HAL/S User's 
Manual appropriate for that machine. 

The Programmer's Guide is divided into three parts: 

• PART I is aimed at the new HAL/S user and contains 
enough information on the compiler language constructs 
to enable him to begin programming . 

• PART II describes other, morei complex, HAL/S constructs 
which will be used regularly in applications programming. 

• PART III presents programming examples designed to 
illustrate and clarify important complex HAL/S Language 
constructs. Some of the examples are constructs too 
advanced to be described in PARTS I and II, but which 
are formally defined in the HAL/S Language Specification. 


INTERMETRICS INCORPORATED • 701 CONCORD AVENUE • CAMBRIDGE. MASSACHUSETTS 02138 • (617) 661-1840 



1 

1 

1 


CONTENTS OF PART I 


1 



p ?,2 e 

I 1. 

STRUCTURE OF HAL/S 

1-1 

i 

1.1 

Structuring and Higher Order Languages 

1-1 

1 

1,2 

The Block Structure of HAL/S 

1-2 

i 

1.3 

Statement Grouping in HAL/S 

1-8 

> 

< 

1.4 

Summary 

1-11 

2, 

HAL/S SYMBOLOGY 

2-1 

k 

2,1 

The Character Set 

2-1 

«r 

2.2 

Reserved Words, Identifiers, and Literals 

2-2 

1 

2.3 

Format of Source Text 

2-8 

1 

2.4 

Statement Delimiting 

2-10 

l 

2.5 

Comments in HAL/S 

2-10 

1 

2.6 

Summary 

2-11 

1 3 

A HAL/S COMPILATION - THE PROGRAM BLOCK 

. 3-1 


5.1 

Opening and Closing the Block 

3-1 

1 

3.2 

Position of Data Declarations 

3-2 

1 

3,3 

Flow of Execution in the Program 

3-3 

1 

3.4 

Summary 

3-4 

1 

DATA DECLARATION 

4-1 

1 

4.1 

HAL/S Data Types 

4-1 

V 

4.2 

Simple Declaration Statements 

4-2 

1 

4.3 

Initialization of Data 

4-10 

1 

4.4 

Summary 

4-13 

[ INTERMFTRICS INCORPORATED • 701 CONCORD AVENUE • CAMBRIDGE. MASSACHUSETTS 02138 

• (617) 661-1840 



I 


Page 


5. 

REPLACE STATEMENTS 

5-1 


5,1 

The Replace Statement 

5-1 


5.2 

Using Repuce Statements 

5-2 


5,3 

Summary 

5-5 

6. 

DATA REFERENCING AND SUBSCRIPTING 

6-1 


6,1 

Subscripts of Unarrayed Data Types 

6-1 


6.2 

Subscripts of Arrayed Data Types 

6-8 


6,3 

Summary 

6-12 

7. 

EXPRESSIONS 

7-1 


7,1 

Arithmetic Operations 

7-1 


7.2 

Character Operations 

7-18 


7.3 

Boolean Operations 

7-20 


7.4 

Combining Operations & Precedence 

7-23 


7.5 

Some Explicit Conversions 

7-26 


7.6 

Summary 

7-32 

8. 

ASSIGNMENTS 

8-1 

i 

8.1 

Arithmetic Assignments 

8-1 


8.2 

Character Assignments 

8-1 


8.3 

Boolean Assignments 

8-1 


8.4 

Summary 

8-1 


i 

1 

INTERMETRICS INCORPORATED • 70 1 CONCORD AVENUE • CAMBRIDGE, MASSACHUSETTS 02138 • (617) 661 -1 840 f 



Page 


t 

i 

i 

i 

i 

i 

t 

i 

i 

i 


9 . CONDITIONAL STATEMENTS AND BRANCHES 9-1 

9.1 The Conditional Statement 9-1 

9.2 Relational Expressions 9-7 

9.3 Labels and Branches 9-15 

9 . A Summary 9-19 

10 . STATEMENT GROUPS 10-1 

10.1 Delimiting Statement Groups 10-1 

10.2 Repetitive Execution of Statement Groups 10-5 

10.3 Selective Execution of Statement Groups 10-13 

10 . A Branching in Statement Groups 10-15 

10.5 Summary' 10-21 

11 . FUNCTIONS AND PROCEDURES 11-1 

11.1 Block Definitions 11-1 

11.2 Parameter Lists 11-1 

11.3 Procedure Calling 11-1 

11. A Function Invocation 11-1 

11.5 Built-in Functions 11-1 

11.6 Summary 11-1 

12 . INPUT/OUTPUT STATEMENTS 12-1 

12.1 The Read Statement 12-1 

12.2 The Write Statement 12-1 

12.3 Simple 1/0 Format Control 12-1 

12.4 Summary 12-1 




& 


\ 


0 



INTERMETRICS INCORPORATED • 701 CONCORD AVENUE • CAMBRIDGE. MASSACHUSETTS 02138 • (617) 661-1840 



13. SUMMARY OF PART I 


Page 

13-1 


INTERMETRICS INCORPORATED • 701 CONCORO AVENUE • CAMBRIDGE. MASSACHUSETTS 02138 • (617) 661-184 


i 




PART I 


Part I of the Programmer's Guide is oriented toward new users 
of HAL/S. It covers all the simpler constructs of the language 
and contains sufficient information for suprisingly complex 
programs to be written. Sections of text delimited by hori- 
zontal bars are comments referring to the existence of more 
complex HAL/S constructs to be explained in Part II. 
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1. STRUCTURE OF HAL/S 


This section gives an overview on an abstract level of the 
overall properties of HAL/S compilations, and tries to relate 
these properties to the need for good programming practice. 
Later sections of the Guide interpret these properties in terms 
of actual HAL/S Language constructs. 


1.1 STRUCTURING AND HIGHER ORDER LANGUAGES 


A common method of problem solving is the so-called "top down" 
approach. The algorithm for solving the problem is first out- 
lined broadly, and then, step by step, delineated in successively 
deeper levels of greater detail. The success of the algorithm 
in arri'-ing at the solution lies as much in its ability to break 
down the problem into its simplest component parts, as in its 
ability to resolve the problem as a whole. 

If a problem is to be solved by programming it in a higher order 
language, then the "top down" approach is of especial interest 
because it lends insight into how the program can be organized. 
Specifically, the organization takes the form of an outer program 
block enclosing numerous nested "subroutines"*. On the outermost 
level, the program is only concerned with the broad outlines of 
the solution, and relegates the first level of detail to the outer 
set of subroutines. These J n turn relegate the next level of 
detail to an inner set of subroutines, and so one until each 
level of the problem has been relegated to the appropriate set 
of subroutines. 


* Here the term "subroutine" is loosely used in its genersMy 
recognized >ense, conveying the idea of a subordinate block 
of code c .ecutable as a unit on demand. HAL/S uses different 
terminr-ogy, to be introduced later. 
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This particular programming technique is partly what is meant 
by "structured programming" . This term also implies an ability to 
form nested groups of executable statements inside a program 
or subroutine. On each level of nesting, a statement group 
has the ability to behave as if it were a single executable 
statement. 

The overall effect of structured programming techniques is to 
introduce an orderliness into the writing of programs that 
not only makes them easier to read but also far less prone to 
error. Most modern higher order languages possess constructs 
out of which structured programs can be created: the constructs 

of the HAL/S language have been defined deliberately with 
structured programming in mind. 


1.2 THE BLOCK STRUCTURE OF HAL/S 


The structure of a HAL/S compilation, as indicated below, 
generally consists of a program block with procedure and 
function blocks nested within it. 


program 



i 

i 

I 

\ 
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Function and procedure blocks comprise the "subroutines” of 
Section 1.1. The more deeply nested a block, the deeper the 
level of detail of the prob 1 em solution it is supposed to 
handle. The difference between function and procedure blocks 
lies in the manner in which they are invoked, and is clarified 
later in the Guide. 

The HAL/S compilation, then, consists of blocks containing 
executable statements, some of which perform operations 
on defined data. 


SCOPING OF DATA 


In HAL/S, all data must be defined in so-called "data declara- 
tions”. An important consequence of the structural properties 
of HAJ./S is its ability to place data declarations so as to bound 
the regions in a program which may reference the declared data. 
This feature is called "scoping". 

Data declared at the program level may generally be used through- 
out the entire compilation: 


i 



region where program 
data declarations are 
known; i.e. the "scope" 
of program data 
declarations. 


5 

> 

M 


program 



In addition, any procedure or function block nested within a 
program block may declare local data — data known only in that 
particular block and in blocks nested within it - as indicated 
be low : 



SCOPING OF BLOCK NAMES 


The program block, and every procedure or function within it 
are named: block names have scoping rules identical with the 

scoping rules for data already described. The name of any 
procedure or function block is deemed to have been "declared" 
in the outer block in which that procedure or function is nested. 

This bounds the region where the name is known, and therefore 
from where the procedure or function may be invoked. Thus, the 
name of any procedure or function nested at the program level 
is known anywhere ^in the program. However, since in HAL/S 
recursion is not allowed, such a procedure or function may be 
ip vok ' id from anywhere except from inside itself , as indicated: 
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! It should be noted that a ll forms of recursion in HAL/S 

are illegal. The form of recursion not prevented by 
the rules given above is that in which procedures P and 

| Q are not contained in each other, but P calls Q and Q 

calls P. 

t 

i 

♦ 

i 



* 

i 

It is also possible for a program 

I (or any block within it) to in- 

voke entities outside the compila- 
tion unit; i.e. other compilation 

1 units. Procedures and functions 

may be compiled independently for 
' this purpose . 

_ See; (tbd) 


I 


I 


I 

1-7 

® INTCRN'CTRICS INCORPORATED • 701 CONCORD AVENUE • CAMBRIDGE, MASSACHUSETTS 02138 • (617) 661-1840 



4 


1.3 STATEMENT GROUPING IN HAL/S 


In HAL/S, the actual step by step solution of a problem is 
performed by executable statements contained in the blocks 
comprising the program. Sequences of executable statements 
may be grouped together and treated as a single compound 
statement. Such statement groups are said to be "well- 
bracketed" - they begin with a special statement (a "DO" 
statement) , and end with another special statement (an "END" 
statement) . Execution of the sequence of statements in the 
group can be controlled in various ways depending on the form 
of the opening "DO" statement: 

• the sequence may be executed once only; 

• the sequence may be executed repetitively until specified 
conditions are met; 

• one statement in the sequence may be selected as the 
only one to be executed. 

Sequences of compound statements may also be grouped together 
in the same way and, in turn, be treated as a more complex com- 
pound statement, and so on to an arbitrary degree of nesting. 

Use of this grouping property in conjunction with other HAL/S 
constructs can substantially eliminate the need for a "GO TO" 
statement (in the Fortran sense, for example) , which from the 
structured programming viewpoint is recognized to be "dangerous" 
because it destroys the readability of a program, and makes it 
more error-prone. 


STATEMENT GROUPS AND GO TO STATEMENTS 

The design of HAL/S minimizes the dangers of "GO TO* statements 
by limiting the regions which can be branched to by them, in a way 
analogous to the limits imposed on data by the scoping rules 
described in Section 1.2. 
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program 

ouuermost 
group X 


iiinermost 
group Y 


f "GO TO" statements contained 


program 

outermost 
group X 


region of 
[legal des- 
tinations 
of GO TO ' s 
in X 
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The region of legal destinations of "GO TO" statements contained 
in group Y are as indicated below: 



program 


:iregion of 
jlegal des- 
tinations 
of GO TO ' s 
in Y 


innermost 
group Y 


It is evident from the examples that while groups can be branched 
out of, or branched within, they may not be branched into. 


INTERACTION WITH BLOCK STRUCTURE 


Since procedure and function blocks may appear anywhere in a program, * 
including inside statement groups, the problem arises of branches 
by means of "GO TO" statements in and out of such blocks. 

In HAL/S, the destinations of "GO TO" statements are labels attached 
to executable statements. Because the scope rules for statement 
labels are the same as for decared data, it follows that it is I 

impossible to branch into a procedure or function block. Additionally \ 
a rule is made that branches may not be made out of a block (even 
though by scope rules the label of the destination is visible) . 


This leaves the reciprocal processes of call and return-to-caller 
the only ways of entering and leaving procedures and functions, 
which is in accordance with structured programming principles. 


I 

i 
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This section has been concerned with the structural properties 

I of HAL/S compilations on an abstract level. It remains to be 

demonstrated in the ensuing sections of PART I how the properties 
are translated into sequences of actual HAL/S constructs. Section 

1 2 begins this on the most basic level by describing the 
characteristics of HAL/S source text. 

I 

\ 

\ 

A. 

i 

I 

I 
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HAL/S SYMBOLOGY 


HAL/S source text has its own particular characteristics; 
a specific character set, special combinations of characters 
set aside as reserved words, and certain rules dictating 
the form of statements. This section is an introduction 
to these characteristics of the HAL/S Language. 


2.1 THE CHARACTER SET 


The HAL/S language uses the following character set: 


ABCDEFGHIJKLMNOPQRSTUVWXYZ 
abcdef ghi jklmnopqrstuvwxyz 

0123456789 

+-*. /| -*-<># 0$, ; s'") (_%« 

(blank) 


This character set is a subset of the standard character sets 
ASCII and EBCDIC. 

Although the user really needs only the above character set 
when writing a HAL/S program, there are additional special 
characters which can be used in comments and in character 
string literals (described later in this section) . 


(){>:? 


The output listings produced by a HAL/S compiler may use these 
extra special characters for annotation. 
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2.2 RESERVED WORDS, 


IDENTIFIERS, 


AND LITERALS 


The HAL/S language uses four kinds of primitive elements as 
basic constructs: 

• RESERVED WORDS are a fixed part of the language and consist 

of combinations of upper case alphabetic characters; 

• IDENTIFIERS are user-defined names used for data or labels, 

and consist of combinations of the alphanumeric characters; 

• LITERALS express actual values, and can consist of any of the 

symbols in the character set; 

» SPECIAL CHARACTERS serve as delimiters, separators or 
operators, and consist of the non-alphanumeric 
characters of the HAL/S set. 


RESERVED WORDS 


Reserved words are words having a standard meaning in the HAL/S 
language. As their name suggests, the user cannot use reserved 
words as identifier names. There are two major categories of 
reserved words : 

t KEYWORDS are used to express parts of HAL/S statements, for 
example: GO TO, DECLARE, CALL, and so on. A complete 
list can be found in Appendix 

• BUILT-IN FUNCTION NAMES are used to identify a library of 
common mathematical and other routines , for example : 
SINE, SQRT, TRANSPOSE, and so on. A complete list can 
be found in Appendix 


I 

I 

I 

I 

I 

I 

I 
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IDENTIFIERS 


An identifier name is a user-assigned name identifying an 
item of data, a statement or block label, or other entity. 
The ‘following rules must be observed ir the creation of 
any identifier name*. 


1. The total number of characters in the name 
must not exceed 32; 

2. The first character must be alphabetic; 

3. The remaining characters may be either 
alphabetic or numeric; 

4 . Any character except the first or last 
may be an underscore (__) . 

I 


Examples: 

ELEPHANT ANDjCASTLE 

A1 

P 


IB 
X X 



| illegal 


* Some implementations of HAL/S may place extra restrictions 
upon the names of identifiers. 
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LITERALS 


The three basic kinds of literals described here are arithmetic, 
character string, and Boolean. The utility of arithmetic 
literals is obvious. In simple programming problems, character 
string literals find most use in the generation of output. 
Boolean literals are used to state logical truth or falsehood. 


• ARITHMETIC LITERALS express numerical values in decimal 

notation. The generic form of an arithmetic literal 
is: 

t 

v 

i 


s 

\ 

) 

1 

I 
I 
f 
1 
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mantissa - ^-exponent 

iddd . dddEiddd 


1. ddd represents an arbitrary 
number of decimal digits. 

2. The exponent is optional. 

3. The t signs are optional. 

4. The decimal point is optional. 

If absent, it is considered to be 
to the right of the least signi- 
ficant digit of the mantissa. 

If the decimal point is present, 
it may appear anywhere in the mantissa. 

5. The minimum number of digits in the 
mantissa, and in the exponent # if 
present, is one. The maximum 
number is implementation dependent. 

(See Appendix ) . 


* wr* 



I 

I 

I 

| Example*.: 

0.123E16 

I ?!- 9 

» It is important to note that HAL/S makes no distinction 

j of type between a integral-valued literal and a fractional 

valued literal. Either integer (w x th possible rounding of 
value) or scalar (i.e. floating-point) type is assumed 
according to the context in which the literal is used. 


P 

5 


4 , 


j The use of multiple exponents* 

I and of binary, hexadecimal ox 

* octal exponents, in also allowed. 

See: (tbd) . 

♦ 

i 

f 

I 

I 

i 

i 2 * 5 
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• CHARACTER STRING LITERALS consist of strings of characters 
chosen from the entire HAL/S character set. The 
generic form is: 


' ccccccc' 


1. The quote marks delimit the 
beginning and end of the 
literal. 

2. cccc represents an arbitrary 
number of characters in any 
combination. 

3. Quote marks within the literal 
must be represented by a pair 
of quote marks to avoid con- 
fusion with the delimiting 
quotes . 

* 

4. The minimum number of characters 
is zero (a 'null' string), the 
maximum is 255*. 


* This value is implementation dependent. See Appendix 
for exceptions. 
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Examples : 


t I 

’ONE two THREE' 
' DOG ''S' 


If a literal consists of a single 
character, or character sequence 
repeated may times, a condensed 
form of literal using a repeti- 
tion factor may be used. 

See: (tbd) . 


• BOOLEAN LITERALS express logical truth or falsehood, 
and are generally used to set up the values of 
Boolean data items (see later) . Their forms are: 


TRUE 

) expressing truth, or 

ON 

J binary "1" 

FALSE 

) expressing falsehood 

OFF 

) or binary "0" 


Literal strings of binary values 
also exist. 

See (tbd) . 
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FORMAT OF SOURCE TEXT 


HAL/S is a "stream-oriented" language, that is, statements 
may begin anywhere on a line (or card) , and may overflow 
without special indication onto succeeding lines or cards. 

Several statements may be written on one line (or card) as 
required. 

HAL/S is among the very few languages which permits subscripts 
and exponents to be represented as they are mathematically, 
using lines below and above the main line respectively as needed. 
This multi-line format is an optional alternative to the HAL/S 
single-line format. 

Even when multi-line format is not used, the first character 
position of each lin< (or card) is reserved for a symbol 
denoting the kind of line format, subscript, main, or 
exponent . 


SINGLE-LINE FORMAT - 

In single-line format, the firsu character position of each line 
is left blank, denoting a main line. (An M can alternatively 
be used but is generally not preferred by users. 


• EXPONENTS are denoted by the operator ** 

Example : 

x t+2 is coded as: 

IM X** (T+2) 

« 

• SUBSCRIPTS are denoted by parenthesizing the subscript and 

preceding it with the symbol $. 

Example : 

a^ + ^ is coded as: 

Jm A$(I+1) 
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MULTI-LINE FORMAT 


In multi-line format, the first character of a main line 
is either left blank or M is inserted as before. The first 
character of an exponent line is E, and that of a subscript 
line is S. 


• EXPONENTS are written on an exponent line (E-line) immediately 
above the main line. 

Example : 

t+2 . . . 

x is coded cs: 

•E T+2 
•M X 


• SUBSCRIPTS are written on a subscript line (S-line) immediately 
below the main line. 

Example: 

is coded as: 

:m A 

: s i+i 

When using multi-line format, care must be taken to ensure that 
nothing on the E- and S-lines overlaps anything on the M-line. 


Exponents of exponents and sub- 
scripts of subscripts use extra 
subscript and exponent lines. 
Special rules apply if exponents 
are subscripted, or if subscripts 
possess exponents. 

See: (tbd) . 
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2. A STATEMENT DELIMITING 


As Section 2.3 indicated, HAL/S statements may be written in 
free form without regard for line (cr card) boundaries. Be- 
cause of this there is the need to explicitly indicate the 
end of each statement with a special symbol. HAL/S uses a 
semicolon for this purpose. The following statements arbitrarily 
selected from the language show the placement of the semicolon. 

Examples : 

DECLARE I INTEGER; 

: 1 = 1 + 1 ; 

*. CALL P(I,J) ; 

I 


2.5 COMMENTS IN HAL/S 


The use of comments is a sine qua non of good programming practice. 
HAL/S possesses two mechanisms for the inclusion of comments in a 
compilation . 

• IMBEDDED COMMENTS may be placed anywhere on main, exponent 

or subscript lines of HAL/S text. 

• COMMENT LINES may appear between main, exponent and subscript 

lines of HAL/S text. 


a 




IMBEDDED COMMENTS 

An imbedded comment takes the form: 


/* ... any text (except */) ... */ 
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Such comments may appear between HAL/S statements or imbedded 
in a statement. They may not appear in the middle of a literal, 
reserved word, or identifier. As far as the sense of the source 
text is concerned, an imbedded comment is treated as if it were 
a string of blank characters. 


Example : 

» 

■M X = X + 1; /* ADD ONE TO X */ 

« 

I 

COMMENT LINES 

Comment lines are input lines specially reserved solely for comments 
by placing the character C in the first character position of the 
line. The rest of the line may contain any desired text. 

Examples : 

iM X * X + 1; 

!C ADD ONE TO X 

'C THEN CARRY ON 

* 


2.6 SUMMARY 

In Section 2, the most basic elements of the HAL/S Language have 
been outlined: reserved words, identifiers, literals, the 

formatting of the source text, and alternate forms of comment 
Insertion. 

In Section 3, the overall form of a HAL/S program will be explained, 
with special references to how declarations of data and executable 
statements may be arranged within it. 
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3. A HAL/S COMPILATION - THE PROGRAM BLOCK 


The structuring of HAL/S programs was dealt with on the conceptual 
level in Section 1. Section 3 begins to interpret this infor- 
mation in terms of actual HAL/S language constructs. 

For the purposes of Part I, an entire HAL/S unit of compilation 
is known as the "program block" . The term "block" has a special 
connotation in this Guide. It is taken to mean a coherent 
body of data declarations and executable statements enclosed in 
statements delimiting its opening and closing / and identified 
with .a name. 


3.1 OPENING AND CLOSING THE PROGRAM BLOCK 


The first statement of a HAL/S program is that statement defining 
the name of the program and opening the program block. The last 
statement of a HAL/S 'program is that statement closing the program 
block. Between the two are all the statements comprising the body 
of the program.. 


PROGRAM OPENING ' 

The statement that opens the program block takes the form: 


<label> : PROGRAM; 

1. <label> is any legal identifier 
name, and constitutes the name 
of the program. 
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PROGRAM CLOSING 


The program block is closed with the statement: 


CLOSE <label>; 

1. The identifier <label> is 
optional. 

2. If <label> is supplied, it 
must be the program name, 
i.e. the <label> on the 
opening statement of the 
program block. 


Example : 


TEST: PROGRAM; 

| body of program goes in here 

CLOSE TEST; 



3.2 POSITION OF DATA DECLARATIONS 

Normal HAL/S programs require the use of data. The names used 
to identify this data must be declared before use by the means 
of data declaration statements. Data declarations (and, 
additionally, certain other kinds of statements) must be 
placed after the program opening statement and before the 
first executable statement. 
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Example : 


TEST: PROGRAM; 


[ I 



p§X: 



CLOSE TEST; 


— data declaration statements 


j — executable statements 


3.3 FLOW OF EXECUTION IN THE PROGRAM 

The program begins to execute with the first executable state- 
ment after the data declarations, and thereafter follows a 
path determined by the kinds of executable statements encountered. 
Unless statement groups, or branching or conditional statements 
intervene, execution is sequential*. Finally, the path either 
reaches a statement terminating execution of the program, or 
reaches the closing statement of the program block, which has 
the same effect. 

As described in Section 1, procedure and function definition 
blocks may be interspersed between the statements in a program 
block. The only way of executing such blocks is by explicit 
invocation: if they are encountered in the path of execution 

they are passed over as if non-existent . 


* This order is called the "natural order* of execution. 
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Example : 



3.4 SUMMARY 

Section 3 has described the opening and closing of a program 
block, has shown where data declarations are placed in it, and 
has explained the path of execution followed through a program 
blocks The following chapters of Part I will begin to fill 
in the details of the possible contents of the block. Section 4 
describes hew data is declared and referenced. It begins to 
build on the fundamental information given in Section 2. 





J 


4. DATA DECLARATION 


Programming largely consists of the manipulation of numerical 
data. The diversity of the data types in a language determines 
its utility for any required task. HAL/S contains an exceptionally 
diverse set of data types. 

Identifiers of the kind described in Section 2 are used to name 
items of data. Identifier names used to represent data items 
must * be defined in data declarations appearing in the appropriate 
program, prodcedure or function block. The effect of placing 
data in different blocks is described in Section 1. The position 
of data declarations within a program block is described in 
Section 3. 

This Section now proceeds to describe the detailed construction 
of data declarations. 


4.1 HAL/S DATA TYPES 

m 


In the HAL/S language, arithmetic data of the following types 

can be declared 1 

e INTEGER for the representation of integer-valued quantities; 

• SCALAR for the representation of "floating-point" quantities; 

• VECTOR for the representation of algebraic row or column 
vectors (without distinction) , and each element of which is 
a SCALAR quantity; 

e MATRIX for the representation of algebraic matrices, and each 
element of which is a SCALAR quantity. 


* The HAL/S language prohibits the use of implicitly declared 
data items considering it to be an undesirable programming 
practice. 
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These arithmetic data types may be specified in either single 
or double precision. In the case of INTEGER, the precision 
determines the maximum absolute value the identifier may take 
on. In all other cases, it determines the number of signifi- 
cant digits in the mantissa of the value. 

In addition, HAL/S also possesses the following data vypes: 

• CHARACTER for the representation of strings of text; 

• BOOLEAN for the representation of binary-valued (logical) 
quantities. 

It is possible to declare arrays (or tables) of any of the six 
above types. 


HAL/S in fact allows more 
data types than just those 
described here. It also 
allows hierarchical organ- 
izations of data-types 
called "structures". 

See: (tbd) 


4.2 SIMPLE DECLARATION STATEMENTS 


Data declaration statements define identifiers used to name data. 
The simplest forms of declaration statement for each data type 
listed above are examined on the following pages. 
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1 

1 

» 

* 

1 

DECLARE <name> INTEGER; 

DECLARE <name> lNTEGER SINGLE; 
DECLARE <name> INTEGER DOUBLE; 


1 . 

In each of the forms <name> is 
HAL/S identifier. 

any legal 

2. 

Presence of the keyword SINGLE 
single precision. 

specifics 

3. 

Presence of the keyword DOUBLE 
double precision. 

specifies 

4. 

Absence of either keyword implies default 
of single precision. 



For the integer data type, single precision usually implies 
halfword and double precision fullword, depending on the 
implementation* . 


Examples : 


I DECLARE II INTEGER; 

| DECLARE BIG_I INTEGER DOUBLE; 


* See Appendix 
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I 


i 


i. 


H 


SCALAR 


; DECLARE <name> SCALAR; 

• DECLARE <name> SCALAR SINGLE; 

| DECLARE <name> SCALAR DOUBI.E; 

I 

1. In each of the forms, <name> is any 
legal identifier. 

2. Presence of the keyword SINGLE specifies 
single precision. 

3. Presence of the keyword DOUBLE specifies 
double precision. 

4. Absence of either keyword implies a de- 
fault of single precision. 

5. The keyword SCALAR may be omitted. 


1 


* 


Double precision usually implies increased range of exponent 
and increased number of digits in the mantissa, but it is 
implementation dependent*. 


Examples: j 

I 

; DECLARE SI; 

; DECLARE S2 SCALAR; ( 

! DECLARE S3 SCALAR DOUBLE; 


1 

] 

* See Appendix 

1 
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MATRIX 


: DECLARE <name> MATRIX (m,n) ; 

) DECLARE <name> MATRIX (m, n) SINGLE? 

; DECLARE <name> MATRIX (in, n) DOUBLE; 

1. In each form <name> is any legal identifier. 

2. Keywords SINGLE and DOUBLE have the same 
significance as for SCALAR and VECTOR types. 

3. m and n denote respectively the number of 
rows and columns in the matrix. They must 
lie in the range 1 < m, n ^ 16*. 

4. If the size specification (m,n) is absent, 
a 3x3 matrix is assumed. 

i 


Examples : 

j DECLARE Ml MATRIX (2,4); 

. DECLARE M2 MATRIX (4,5) DOUBLE; 
J DECLARE M3 MATRIX; 

' \ 

'a 3x3 matrix 


* This value may be implementation dependent. See Appendix 
for exceptions. 
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VECTOR 


I DECLARE <name> VECTOR (n) ; 

; DECLARE <name> VECTOR (n) SINGLE; 
i DECLARE <name> VECTOR (n) DOUBLE; 


1. In each form <name> is any legal 
identifier. 

2. Keywords SINGLE and DOUBLE have the 
same significance as for SCALAR type. 

3. n specifies the length of the vector 
and must lie in the range 1 < n ^ 16*. 

4. If the length specification (n) is 
omitted a length of 3 is assumed. 


Examples : 

j DECLARE VI VECTOR (10); * 1 

. DECLARE V2 VECTOR (3) DOUBLE; f 

| DECLARE V3 VECTOR; 

'V 1 

a 3-vector \ 

I 

* This value may be implementation dependent. See Appendix 

for exceptions . j| 

I 
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CHARACTER 



DECLARE <name> CHARACTER (n); 


<name> is any legal identifier. 

n specifies the maximum length of the text 
string that the data type may carry. (i.e. 
the maximum number of characters) . It must 
lie in the range of 1 ^ n < 255*. 

The actual length of the string of text 
carried may vary during execution between 
zero (a "null" string) and the maximum n. 



Example 


DECLARE Cl CHARACTER (80) 


BOOLEAN 



Example : 


: DECLARE B1 BOOLEAN; 


* This value may be implementation dependent. See Appendix 
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ARRAYS 


In any of the above declarations, regardless of data type, 
the part of the declaration between the <name> and the 
terminating semicolon which establishes the type (and 
possibly precision and size) constitutes the "attributes" 
of the declaration. 

To declare an array of any data type an ARRAY specification 
is inserted between the <name> and the attributes: 


; DECLARE <narae> ARRAY (n) <attributes> ; 

1. <attributes> stands for any legal form of 
attributes for any data type described. 

2. n denotes the number of elements in the array 
(i.e. entries in the table) and must lie in 
the range 1 < n < 32768*. 


Examples: 

' .'DECLARE AS1 ARRAY (500) SCALAR; 

I DECLARE AMI ARRAY (20) MATRIX (4, 4); 


* This value may be machine dependent. See Appendix 
for exceptions. 
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COMPOUND DECLARATIONS 


If a program contains declarations of many data items it is 
tedious to repeat the keyword DECLARE in every declaration. 
Many separate declarations may be condensed into one compound 
declaration as shown below. 


Example : 


, DECLARE S; 

DECLARE I INTEGER DOUBLE; 

1 DECLARE M3 MATRIX ; 

1 DECLARE M6 MATRIX (6,6); 

• DECLARE B BOOLEAN; 

I DECLARE C ARRAY (5) CHARACTER ( 2 0 ) ; 
| DECLARE V ARRAY (3) VECTOR; 


separate declarations 


. DECLARE S, 

I INTEGER DOUBLE , 

I M3 MATRIX, 

| M6 MATRIX (6,6) , 

B BOOLEAN, 

. C ARRAY (5) CHARACTER (20) , 

I V ARRAY (3) VECTOR; 

I 


{ equivalent compound 
declaration 


Note the commas 


separating the declaration of each data item. 


If the identifiers in a compound 
declaration have some attributes 
in common a third even more 
compact form of declaration 
called a factored declaration 
can be used. 

Seet (tbd) 


4-9 


INTERMETi- CS INCORPORATED • 701 CONCORD AVENUE • CAMBRIDGE. MASSACHUSETTS 02138 • (617) 661-1840 



4,3 INITIALIZATION OF DATA 


A ”AL/S data item of any type may be initialized by incorporating 
an INITIAL specification into its declaration statement. The 
form of such a specification differs depending on whether the 
data item is "uni-valued" or "multi-valued". 

• UNI-VALUED data items are those having only one element: 
unarrayed scalars, boo leans, and characters. 

• MULTI-VALUED data items are those having more than one 

element: unarrayed vectors and matrices, and arrayed 

data items of any type. 

In either case, the INITIAL specification is placed after the type, 
precision, and size attributes of a declaration. This positioning 
will become apparent in the examples to follow. 


UNI-VALUED DATA ITEMS 


The two variations of the form of INITIAL specification for 
uni-valued data items are: 


INITIAL (<value>) 

CONSTANT (<value>) 

1. The two forms have the same effect in 
that the data item is initialized to 
the literal indicated by <value>. 

2. The form using the keyword CONSTANT is 
required 1 only if the user wishes not 
to change the initial value during 
execution* . 

3. The type of the literal <value> must 

be compatible with the type of the data 
item as determined from the following 
table: 


data type 

literal value 

CHARACTER 

character string 

BOOLEAN 

boolean 

INTEGER ) 

SCALAR / 

arithmetic 


* In many respects a data item initialized this way is akin to 
a literal. 
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I 

1 

E 

i) 

II 




) 


Examples: 

! DECLARE A SCALAR INITIAL (3), 

B SCALAR CONSTANT ( 4. 5E-3 ) , 

' C CHARACTER (80) INITIAL (' YES ’) , 

j D BOOLEAN INITIAL (TRUE) ; 

| Note: initial working length of C becomes 3. 


MULTI-VALUED DATA ITEMS 


There are two corresponding variations of the INITIAL specification 
for multi-valued data items : 


INITIAL (< value > , <value>, ) 

CONSTANT (< value >, < value >, ) 

1. The meaning of the keyword CONSTANT is 
the same as for uni-valued data items. 

2. The type of the literal <value> must be 
compatible with the type of the data item, 
as determined from the following table. 


3. 


data type 


literal value 


CHARACTER 

BOOLEAN 

INTEGER 

SCALAR 

VECTOR 

MATRIX 


character string 
boolean 

arithmetic 


The number of <value>s in the list must 
equal the total number of elements implied 
by the data declaration. 


Note that if all the elements of a multi-valued data item are to 
be initialized to the same value then the form used for uni-valued ■ 
data items may be used. 
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Examples : 


DECLARE V 
S 
T 


DECLARE V 
S 


VECTOR INITIAL (1,2, 3. 5) 

ARRAY (2) CONSTANT (1,0) , 

ARRAY (2) VECTOR (2 ) INITIAL (4 .7 , -5 .3 , 0, 0) ; 

VECTOR INITIAL (0 ) , 

ARRAY (100) INTEGER INITIAL (256) ; 


all elements of these data 
items are identically 
initialized. 


ORDER OF INITIALIZATION 


To complete the specification of initialization the order of 
initialization of the elements of multi-valued data items 
needs to be defined. 

The following ordering rules, though applied here to the 
initialization of multi-valued data items, holds true when- 
ever the ordering of elements is called into question. 

• VECTOR data items are initialized in order of increasing 
index . 

• MATRIX data items are initialized row by row in order of 
increasing index. 

• ARRAY data items are initialized array element by array element 
in order of increasing index. Where the array element are 
themselves multi-valued, each array element in turn is 
initialized completely according to the previous rules before 
going on to the next. 


Example : 

DECLARE M ARRAY (2) MATRXX(2,2) INITIAL (1,2 ,3,4 ,5,6 ,7,8) j 
if is the first array element, and is the second, then: 


M 


1 * 
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Additional more compact initialization 
forms are 'available if only partial 
initialization is xequired, or if 
subsets of the initial values are 
identical. See. (tbd) 


4.4 SUMMARY 


Section 4 has dealt with how data is declared in HAL/S 
compilations, and how it initialized. The next logical 
step is to begin to discover how it may be used. However, 
this is put off until Section 6. Section 5 deals with a 
useful HAL/S construct which allows the user to replace 
frequently-repeated HAL/S expressions by defining and 
substituting a symbolic name. 

of Section 5 can be omitted without detriment to the 
understanding of the remainder of Part I of the Guide. 
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REPLACE STATEMENTS 


a 

i 

i 


5. 


When it is necessary to repeat a particular HAL/S construct 
exactly many times during a program, the user can avoid the 
tedious process of laboriously writing it at length each time 
by defining a symbolic name to represent the construct, and 
then replacing the construct with the symbolic name. 

This kind of substitution can be of advantage in several 
ways. For instance, the value of a literal recurring many times 
can be easily changed between successive compilations. The user 
need only define a symbolic name to represent the literal, then 
replace the one with the other. Only on? line of the program 
needs to be recoded as opposed to the many lines that would 
need recoding if the user had to find and change the literal 
each time it occurred. 

The definition and substitution of the symbolic name is 
accomplished by a REPLACE statement. 


5.1 THE REPLACE STATEMENT 

The REPLACE statement is placed together with the data 
declarations of the program, procedure, or function block in 
which it is to be used. It takes the form: 


I 

• REPLACE <name> BY "XXXXXXXXXXX"; 

I 

1. XXXXXXX represents the HAL/S source text which 
it is desired to substitute. The text is de- 
limited by double quote marks, and must be 
written in single line format. 

2. <name> is the symbolic name chosen to repre- 
sent the text. It may be any legal identifier 
name. 

3. XXXXXXX may be any legal source text of arbi- 
trary length. Imbedded double quote marks 
must be represented as a pair of double quote 
marks to avoid confusion with the delimiters. 

4. The text must not begin or end in the middle 
of a reserved word, identifier, literal, or 
imbedded comment. 
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Examples : 


REPLACE OUTPUT BY "WRITE (6)"; 
REPLACE INCREMENT BY "X=X+1;"; 


5.2 USING REPLACE STATEMENTS 


The following examples show the way in which the symbol 
substitution defined by the REPLACE statement is used. 

Examples : 

I 

| REPLACE DV BY "VECTOR DOUBLE INITIAL (0)"; 

, DECLARE VEC1 DV, 
i VEC2 DV, 

i VEC3 DV; 

i 

- by expansion of DV it is evident that 
VEC1, VEC2, VEC3 are all double precision 
vectors initialized to zero. 


REPLACE N BY "4"; 
DECLARE VI VECTOR (N) , 

Ml MATRIX (N,N), 
M2 MATRIX (2, N); 


- this shows the utility of the REPLACE 
statement in making it easy to change the 
i.sizes of several vectors and matrices 
simultaneously . 


i 

» 

* 


REPLACE X BY "VECTOR (2 )" ; 

REPLACE Y BY "ARRAY (5) X"; 

- this is an example of nested sub- 
stitutions. The expansion of Y is 
ARRAY (5) VECTOR (2). 


REPLACE X BY "REPLACE Y BY"" 2"""; 

X; 

DECLARE Y SCALAR; 

- although this is a legal use of REPLACE statements, it 
does not lend itself to clarity. The sequence of state- 
ments culminates in Z being declared as a scalar data 
item. 
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I 


A REPLACE statement takes effect only after it appears. 

It does not modify the entire block, only that section that 
follows its appearance. 

Example : 

I 
I 
l 

I 

I 

- the REPLACE statement will only be 
effective starting with the second 
declaration statement. N is un- 
known in the first declaration and 
compilation would detect the error. 


DECLARE VI VECTOR (N); 
REPLACE N BY "4"; 
DECLARE V2 VECTOR (N) ; 


Care must be taken in using REPLACE! statements because 
th. ways in which they are affected by the block structure 
of the HAL/S program in which they appear are not always 
obvious. 

Example : 


» 


REPLACE X BY "Y"; 


DECLARE X SCALAR; 


Program 


-Procedure block 


the user must remember 
that the X of the local 
declaration inside the 
procedure block is still 
subject to the REPLACE' 
statement at the program 
level. 


i 

I. 
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The only case in which a REPLACE statement in an outer block 
becomes ineffective in an inner block is when the inner block 
has a REPLACE statement in it with the same nitne. 


Example: , 





Program 

'Procedure block 
^Procedure block 


region where X is 
replaced by Y 



region where X is 
replaced by Z 


Replace statements may also 
possess parameters, timing 
them with a eopnisticated 
macro expansion facility. 
See: (tbd) . 
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5.3 SUMMARY 




I 
1 
I 
I 

I Section 5 has dealt with a mechanism for symbolic replacement 

of HAL/S source text. Section 6 begins to examine the way in 
which executable statements are constructed by describing how 
data is referenced. 

I 

I 

1 

1 

I 

I 

i 

i; 
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6. DATA REFERENCING AND SUBSCRIPTING 


Any appearance of the name of a previously-declared dafa item 
in an executable statement constitutes a reference tr its value 
(and possibly causes a change in its value)*. Sometimes it is 
necessary to be able to reference elements of vectors, matrices, 
and arrays, and also to reference parts of character strings. 
HAL/S has a wide range of subscript forms designed for this 
purpose. 

Two kinds of subscripting are relevant to the data types 
described in Section 4. 

• COMPONENT SUBSCRIPTING allows the user to select elements 
or subsets of elements from vectors and matrices, and to 
select substrings from character data items. 

• ARRAY SUBSCRIPTING allows the user to select elements or 
subsets of elements from arrays of any data type. 

Depending on the nature of a particular dcta item, either or 
both Kinds of subscripting may be affixed to it. 


6.1 SUBSCRIPTS OF UNARRAVED DATA TYPES 


Unarrayed data types, i.e. those whose declarations contain no 
array specification, may at most possess only component subscript 
ing. Unarrayed data items of integer, scalar, and Boolean 
types may not possess any subscripting. Allowable subscripts 
for the remaining types, - character, vector, and matrix - are 
now each described in turn. 


I 


* This Section, for convenience, includes appearance causing 
change in value under the term "reference”, even though 
this is not the most usual meaning of the term. 


I 
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CHARACTER 


In a character data item, character positions are indexed left 
to right starting from 1. In the subscript forms given below, 
STRING represents an unarrayed data item of character type with 
current working length L.* 

• To select the a^-h character from STRING: 


STRING 

a 

1. a is an integer expression in 
the range 1 ^ a ^ L. 


• To select a characters from STRING, starting from the 
8 th : . 


7 

] 
1 

J 

* In the case where reference of a subscripted character data 1 

type causes a change in its value (e.g. on the left hand side J 

of an assignment), somewhat different interpretations of the 
subscript forms hold true. An account of these is given in ■* 

Section 8.2. J| 

I 
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STRING 


a AT 6 


1. a and 8 are integer expressions. 

2. 8 is in the range 1 < 8 ^ L. 

3. a is in the range 0^a^L-3 + l. 




4 * 


J 


I 

1 

I 

I * To select a substring starting with the a^h character 
of STRING, and ending with the 8^: 


STRING a TO 6 

1. a and 8 are integer expressions in 
the range 1 ^ a, 8 < L. 

2. 8 < a. 


Examples : 


if the value of C is ’ABCDEF' then: 


C 5 is 'E' 


C 2 AT 2 1S ' BC ' 
C 4 TO 6 is ’ DEF ' 


VECTOR 


£ 


c 

r 


•i 


Elements of a vector are indexed starting from 1. In 
the following subscript forms, VEC represents an unarrayed 
vector data item of length L. 

• To select the a*-* 1 element from VEC: 
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• To select an a-vector partition starting from the 0^ 
element of VEC: 



• To select a partition starting from the o^h element of 
VEC and ending with the $th. 


i 

J 

I 

1 
] 
1 
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Examples: 


if V 


3 TO 4 


'2 AT 1 


4.5 

9.3 

7.1 

2.7 

4.5 

7.1 

2.7 


4.5 

9.3 


then: 

(scalar) 

(2 -vector) 

(2-vector) 
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MATRIX 


) 


Rows and columns of a matrix are indexed starting from 1. 

Any matrix subscript must consist of a row subscript followed 
by a column subscript. In the following abscript forms, MAT 
represents an unarrayed M x N matrix data item. 

• To select the element of MAT common to the a *-* 1 row and 
3 th column: 



• To select the a th row of MAT: 


1. a is an integer expression in the. 
range 1 .$ a < M. 

2. The resultant data is N-VECTOR. 

3. If the asterisk is replaced by a 
TO- or AT- subscript under the 
rules given for VECTOR data types, 
a vector partition from the a^h 
row may be selected. 
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• To select the 8 fc ^ column of MAT: 


MAT D 

*/ 3 

1 . 8 is an integer expression in the 
range 1 <$ 8 < N. 

2. The resultant data type is M-VECTOR. 

3. If the asterisk is replaced by a 
TO- or AT- partition under the 
rules given for T7 ECTOR data types, 
a vector partition from the 8 fc h 
column may be selected. 


* 


• To select a a x y matrix partition starting from the 
8 th row and 5 th column of MAT: 


fr, 

\ 


k 

4 

j 

* 

I 


i 


MAT a AT 8, Y AT 6 

1. a, y are integer literal values in 
ranges 2 ^ a < M, 2 ^ y < N 
respectively . 

2. 8»Y are integer expression in 
ranges 1^ 8 < M - a + 1, 
1^6 <N-y + 1 respectively , 

3. Either or both the AT- subscripts 
may be replaced by TO- subscripts 
under rules already given by VECTOR 
and MATRIX types. 

4. Either of the AT- subscripts may in 
addition be replaced by an asterisk 
if all M rows or all N columns are 
to be included in the partition. 
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1 


Examples : 

if M = 


1.1 

| 2.1 

3.1 


M 2,3= 2 ’ 3 


M 


* f 1 


1.1 

2.1 

3.1 


1.2 1 . 3 | then : 

2.2 2.3 

3.2 3.3 

(scalar) 
(3-vector) 


M 


2, 2 TO 3 


M 


*, 2 AT 1 


(2 -vector) 

(3x2 matrix) 


M 


1 TO 


[’:!] 

[ i.i 1.2 ~ 

2.1 2.2 

3.1 3 . 2 _ 

2, 1 TO 2 = f 2 ; 3 l l] 12x2 matrix) 
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6.2 SUBSCRIPTS OF ARRAYED DATA TYPES 


Arrayed data types, i.e. those whose declarations contain 
an array specification, may possess array subscripting. 

If the data types are vector, matrix, or character, then 
they may, in addition, possess component subscripting. 


ARRAY SUBSCRIPTING ONLY 


Arrays are indexed starting from 1. In the array subscript 
forms given below, TABLE represents an array of length L 
of any data type . 

• To select the a^h array element from TABLE: 


i 


I 

I 

I 

I 


* 


I 


1 


t 


I 


TABLE 

a: 

1. a is an integer expression in the 
range 1 < a < L. 

2. The colon is optional if the data 
type of TABLE Is INTEGER or SCALAR. 


• To select a sub-array of length a starting from the 
array element of TABLE: 


TABLE 


a AT 0: 


1. a is an integer literal value in the 
range 1 < a < L. 

2. 8 is an integer expression in the 
range l<$8<L-a + l. 

3. The colon is optional if the data 
type of TABLE is IK -EGER or SCALAR. 
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1 




\ 


I 

I 

I 

« • To select a sub-array starting from the o?-* 1 array 

1 element of TABLE and ending with the & 



Examples: 

if T is a 4-array of booleans with values 
(TRUE, FALSE, TRUE, TRUE) then: 

T 2 . is FALSE (unarrayed) 

T 3 TO 4: is (TRUE, TRUE) (still arrayed) 

if T is a 4 -array of integers with values 
(1,2, 3, 4) then: 


I 

I 

I 

I 

I 

I 


T 2 is 2 (unarrayed) 

T 3'T0 4 ( 3 »*) (still arrayed) 

if C is a 3-array of characters, with values 
('YES', 'NO', 'MAYBE') then: 

is 'YES' (selects first array element/ 

c 2 10 3: is ('NO' » 'MAYBE') (still arrayed) 


optional colon 
omitted 
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ARRAY AND COMPONENT SUBSCRIPTING 


If TABLE represents an array of vector, matrix, or character 
data type, then the following rule shows how array and 
component subscripting are juxtaposed. 


TABLE 

<array ss>:<component ss> 

1. <array ss>: represents array sub- 

scripting of any of the forms 
previously described. 

2. <component ss> represents any form 
of component subscripting legal 
for the data type of TABLE, as 
described in Section 6.1. 


The purpose of the colon now becomes clear: it is required 

to distinguish and separate array and component subscripting. 


Examples : 


if C is a 3-array of characters, with values 
('YES' , 'NO' , 'MAYBE') then: 

C_ - is 'Y' (selects 3 r< * character from third 

* array element) 

if M is a 2-array of 2x2 matrices with values 



[7 s]) then! 

(element in 2 nd row, 2 n< * column 
of second array element) 
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J 


I 


i 


I 

I 

l 

I 

I 


Apparently, the colon should be 
optional on Boolean data types 
also. It is not because the 
Boolean data type is a degener- 
ate case of a bit string data 
type which may possess com- 
ponent subscripting. 

See: (tbd) . 


COMPONENT SUBSCRIPTING ONLY 


When an arrayed data item of vector, matrix or character 
type is required to be given only component subscripting, 
array subscripting cannot be totally omitted . Rather, it 
must be replaced by an asterisk. Let TABLE represent such 
a data item; the subscripting form is then required to be: 


TABLE 

*: <component ss> 

1. <coraponent ss> represents any form 
of component subscripting legal for 
the data type of TABLE, as described 
in Section 6.1. 



( 


Examples: 

if C is a 3-array of characters with values 
( , YES , , , NO , , , MAYBE') then: 

C - is ('Y’f'N'f'M') (makes 3-array from first character 

of each item) 

if H is a 2-array of 2x2 matrices with values 


then: 


(2-array of scalars) 

(2-array of 2-vectors) 
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HAL/S allows more general forms of 
subscript expressions than just 
those stated in Section 6. In 
addition, a symbolic form of 
reference to the last array or 
other element of a data type is 
allowed. Even more complex 
forms of subscripts apply to parts 
of tree organizations of data 
('structures' ) . 

See: (tbd) 


6.3 SUMMARY 


This section has comprehensively described the form** of 
subscripting available in HAL/S. At this point in the Guide, 
sufficient information has been given to allow the user to be 
able to reference different kinds of data. Section 7 shows 
how operations may be performed on the data so referenced. 
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7. 


EXPRESSIONS 


Section 6 dealt with the referencing of declared data items. 

At this point it is appropriate to describe how the values of 
these data items can be manipulated. In HAL/S the construct 
which specifies operations on data items is called an EXPRESSION*. 
In many cases it is very close in form to the generally accepted 
notion of a mathematical expression. 

Expressions consist of sequences of oierations, possibly paren- 
thesized in places to override the precedence rules of HAL/f. 

Each operation is comprised of one or two operands and an operator. 
This section begins by describing the legal HAL/S operations, and 
then continues to show how they are combined into € Sressions. 

Previous sections of the Guide have divided data items and literals 
into three broad classes: arithmetic, character, and Boolean. 

It is convenient to divide the operations to be described into the 
same three classes. The type of an expression is the type of the 
value resulting from its execution, and may, in general, be 
different from the types of some of its operands. 


7.i ARITHMETIC OPERATIONS 


Arithmetic operations are the most numerous of all operations 
in the HAL/S language. They comprise operations on vector, matrix, 
integer, and scalar data types. HAL/S recognizes the foil awing 
operations: 


v The storing of the resu t of a HAL/S EXPRESSION into a data 
item it performed by an ASSIGNMENT statement, of which the 
EXPRESSION forms a part. 
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Symbol 

Purpose 

** 

exponentiation, inversion, 
transposition 

(blank) 

multiplication 

* 

vector cross product 

• 

vector dot product 

/ 

division 

+ 

addition 

i 

subtraction, negation 


NEGATION 

Negation is a binary operation applicable to any arithmetic 
data type: 


Symbolic form: - r 

1. The legal data types ’.or R are given 
by the following table: 

■gr.t-ZEg 

MATRIX 

VECTOR 

SCALAR 

INTEGER 

2. Negation of vector and matrix types 
implies element-by -element negation. 


Examples : 


if Z is an integer and I 3 
then -I = -5 
if V is a 3 -vector and V = 



5 
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| ADDITION AND SUBTRACTION 

I Addition and subtraction can only take place between compatible 

™ arithmetic data types: 

I 
I 

I 

% 

I 

I 
f 
I 
I 
I 
I 
l 
\ 

\ 

I 
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Symbolic form: L ± R 

1. The legal combinations of data types 
are indicated by the following table: 


L -type 

R -type 

MATRIX 


MATRIX 

VECTOR 


VECTOR 

SCALAR 


( SCALAR 

INTEGER 

/ 

\ INTEGER 


2. Operations on matrix and vector operands 
imply element -by-element addition and 
subtraction. 

3. The operands in a matrix addition or 
subtraction must have the same row and 
C9lumn dimensions. 

4. The operands in a vector addition or 
subtraction must have the same lengths. 

5. In a mixed integer-scalar operation , the 
result is scalar. The integer operand is 
first converted to single precision 
scalar . 




Examples: 


* 


{ 

.1 


If I is integer with 1=5 
S is scalar with S = -4.2 
then 

I + 1 = 6 (integer result) 


I + 0.5 = 5.5 
S + 1 
I - S 


(scalar result) 
= -3.2 (scalar result) 
=9.2 (scalar result) 


if VI is a 3-vector with VI = 



V2 is a 4-vector with V2 



then the operation VI + V2 
VI, V2 do not match; 


is illegal because the lengths of 


but 

VI - V2 


1 TO 3 


-1.5 

-2.5 

1 . 0 . 


is legal because subscripting 
of the R operand has produced 
a 3- vector. 


Using S, VI above, 

S + VI is illegal because the types are incompatible; 

but S + Vl 3 = -1.0 is legal and has a scalar result because 

subscripting has changed the R operand to 
scalar type. 
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if Ml is a 


3x2 matrix with Ml 


1.0 0 

-0.5 -1.0 

. 0 0 


M2 is a 2 x 2 


matrix with M2 


0.5 -0.5 

1.0 1.0 


then Ml - M2 is illegal because the row dimensions of the 
operands do not match; 

but. Ml _ . - M2 h[ 0.5 0.5] is legal because the 

^ ' 1-1.5 -2.0 1 number of rows in the 

L operand have been 
reduced to 2 by sub- 
scripting. 


DIVISION 


In division, the dividend may be any data type, but the divisor 
must either be integer or scalar. 


Symbolic form: L ./ R 

1. Ttie legal combinations of data types are 
given by the following table: 


1 

L -type 

i 

R -type i 

MATRIX ) 


VECTOR ( 

f SCALAR 

SCALAR ( 

\ INTEGER 

INTEGER ' 



2. If the dividend is of matrix or v°ctor 
type, element-by-element division by the 

R operand is implied. 

3. If either or both operands are of integer 
type, they are first converted to scalar 
type. 
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1 


Examples: 


1/2 = 0.5 (both integer operands converted to scalar) 


if V is a 3-vector with V 


2.0 

4.0 

. 6 . 0 ., 


then 


V/2 


' 1.0 

2.0 

.3.0. 


if M is a 2 x 2 matrix with M 


1.0 -0.5 

0.2 0.6 


S is a scalar with S = 0.5 


then S/M is illegal since the . operand may not be of matrix 
type, 

but M/S = [2.0 -1.0] 

10.4 1.2] 


I 


DOT PRODUCT 

The HAL/S dot product operation corresponds to the mathematical 
dot or inner product of two vectors. In mathematical notation: 


s = <u, v> or s = u T v 

where u, v are column vectors and lenotes the transpose. 

Note that HAL/S does not require the user to distinguish between 
row and column vectors because the position of the operand in the 
operation is sufficient in itself to allow it to be interpreted 
as one or the other. 



Symbolic 

form: L . R. 

1. 

The operands of the dot product must be 
as shown: 


L “type 

R-type 


VECTOR 

VECTOR 

2. 

The lengths of 
the same. 

each operand must be 

3. 

The result is of scalar type. 
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Example : 

If V is a 3-vector with V 
then V.V =1.5 


0.5 

1.0 

.-0.5 


CROSS PRODUCT 


The HAL/S cross product operation corresponds to the mathematical 
vector cross product in 3-dimensional Euclidean space: 



if w is perpendicular to u, v 
as shown, 

and j w | - | vi | j v | sin 0 
then w = u x v 


Symbolic form: L *R 

1. Tlie type of the operands must be vector: 


» L -type 

R.-type 

VECTOR 

VCCTOR 

Both operands muse, be of length 3. 

The result _s a 

3-vector. 


Example : 

if VI is a 3-vector with VI 

V2 is a 3-vector with V2 

then VI * V2 = To 1 

L0.25J 

INTFRMETRICS INCORPORATED • 701 CONCORD AVENUE 

M 
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MULTIPLICATION 


The HAL/S language has no explicit symbol for multiplication: 
the adjacency of two operands signifies this operation. Multi- 
plication can take place with arithmetic operands of any type: 

• If operand types are either integer or scalar, multiplication 

in the regular arithmetic sense is implied; ...CASE Q 

• if one operand is integer or scalar, and the other vector or 
matrix, then element-by-element multiplication is implied; 

...CASE g) 

• if both operands are vectors then the outer product is implied 

the result being a matrix; ...CASE 


• if both operands are matrices, the matrix product is implied; 

... CASE 




if one operand is a matrix, and the other a vector, then 
a vector-matrix product is implied, the result being a 
vector. ...CASE 



The symbolic form for multiplication is as shown: 


Symbolic form: L R 

1. At least one blank character must 
separate the L and R operands. 


The additional rules applicable to each of the cases described above 
ire now listed in turn. 
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CASE Q 


2 . The operand 

types are 

L-type _ 

R -type 

INTEGER) 

/ INTEGER 

SCALAR ) 

1 SCALAR 


3, If both operands are integer, the 
result is integer, otherwise it is 
scalar. 

4. If one operand is integer, then it 

it first converted to single precision 
scalar. 


Example: 

If I is integer with I s 10 

then 1.5E-2 I ii 0.15 (scalar result) 


CASE @ 


2. The operand types are: 


L -type 

R -type 

INTEGER) 

i VECTOR 

SCALAR / 

(MATRIX 

VECTOR ) 

) INTEGER 

MATRIX ) 

( SCALAR 


3 . Element-by-element multiplication 
of the vector or matrix is implied. 

4. If an operand is of integer type, it 
it first converted to single precision 
scalar. 
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Examples: 

if S is scalar with S 5 1.5 - 
M is a 2 x 2 matrix with M = 


[ 0 0 .: 
1 - 0.1 0 .. 


then 

S 

M H [ 0 

0.45] 



1-0.15 

0.6 J 

and 

M 

S =f 0 

0.45] 

* 


1-0.15 

0.6 J 


CASE ( 5 ) 


The operand types are: 

1— type 1 R-type 

VECTOR I VECTOR 
* 

If the L -operand is of length m, 
and the R operand is of length n, 
the result is an m x n matrix. 


Examples : 

If VI is a 3-vector with VI = 


' 1.0 
- 1.0 
1.0 


V2 is a 2-vector with V2 5 
then VI V2 = f 0.5 0.6l 


and V2 VI 2 


or with V2 = f 0 • 5 1 

10.6 J 

0.5 0.61 (3x2 matrix) 

-0.5 -0.61 
0.5 0.6j 

ro.5 -0.5 0.51 (2 x 3 matrix) 

L0.6 -0.6 0.6J 
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.1 


CASE (?) 


2. The operand types are: 


1“ type 

R-type 

MATRIX 

MATRIX 


3. The number of columns in the 

L operand must equal the number of 
rows in the R operand. 

4. If the L operand is an m x n matrix 
and the R operand is an n x p matrix, 
the result is an m x p matrix. 


Examples : 

If Ml is a 2 x 3 matrix with Ml = 
M2 is a 3 x 2 matrix with M2 = 


I 1 * 

lo. 


0 1.0 

5 -0.5 


2 . 0 ] 

1.0J 


0 0.5 

0 1.0 
0 1.0J 


then Ml M2 = 


= [0 3.5 | 

10 0.75] 


and M2 Ml = 


0.25 -0.25 

0.5 -0.5 

0.5 -0.5 


(2x2 matrix) 

(3x3 matrix) 


0.5] 

1.0 

1.0 


Note that by using partitioning subscripts that 

M ^*,2 TO 3 112 because of dimension mismatch; 


but M2 Ml 


*,2 TO 3 s 


0.25 -0.25 

0.5 -0.5 

0.5 -0.5 


is still legal 
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i 


I 


CASE @ 

j 2. The operand types are: 


L-type 

R-type 

VECTOR 

MATRIX 

MATRIX 

VECTOR 


3. If the L operand is an m x n matrix, 
the R operand must be an n-vector, 
and the result is an m-vector. 

4. If the L operand is an m x n matrix, 
the R operand must be an m-vector, and 
the result is an n-vector. 


i 

I 

I 

t 

"T 

l 

\ 


Note that the position of the vector operand again determines 
its interpretation as either a row or column vector. 


Examples : 

If M is a 3 x 2 matrix with M = 


0.5 1.0 

0 1.0 
L0.2 0.4 


V is a 3-vector with 


’ ' B: 


then V 


(2-vector) 


M = f 0.7] 
lo.4j 

and M V is illegal because of dimension mismatch} 
however, M v i jq 2 5 f— 0 - 5 1 is legal. 


m 


i 
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EXPONENTIATION, INVERSION AND TRANSPOSE 


In HAL/S, a single operator serves for exponentiation, matrix 
inversion, and matrix transpose, the operand types serving to 
distringuish between then. 

• If both operands are integer or scalar, then exponentiation 

is implied; ...CASE 

• if the left operand is a square matrix, and the right is 

an integer-valued literal, a repeated matrix product or repeated 
product of inverse is implied; ...CASE 

• if the left operand is a matrix, and the right operand is 

the character 'T', then the transpose is implied. ...CASE 

These operations take the general symbolic form; 


Symbolic form: l ** R 

1. This is the one-line format version. 

In multi-line format the operator symbol 
is omitted and R is placed on an exponent 
line. See Section 2.3. 

A 


The rules fot each of the cases listed above are now described in 
turn. 
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CASE (T) 


The operand 

types are 

L -type 

R -type 

INTEGER \ 

i INTEGER 

SCALAR ) 

l SCALAR 


3. If the L operand is integer and 
the R operand is a non-negative 
integral-valued literal, then the 
result is integer, otherwise it is 
scalar. 

4. Consistent with Rule 3, if the result 
is scalar, then any integer operands 
are first converted to single-precision 
scalar. 


Examples: 

If I is an integer with 1=5 


then 

I ** 2 i 

10 

(integer result) 

and 

I**-l = 

0.2 

(scalar result) 

also 

2**1 .5 = 

✓2 

(scalar result) 
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CASE ( 5 ) 


2. The operand types are: 


L -type 

R -type 

MATRIX 

INTEGER 


3. The L operand 2.3 a square matrix. 

4. The R operand is an integral-valued 
literal. The following table shows 
the effect of different ranges of 
values of the R operand: 


va lue 


result 


< - 2 
-1 
0 

1 - 

> 2 


repeated product of inverse 

inverse 

unit matrix 

no-operation 

repeated product 


Examples: 

If M is a 2 a 2 matrix with M 3 1 0.5 11 

1-0.5 0J 

then M 2 = [-0.25 0.5l 

1-0.5 -0.51 



and M° = [1.0 0 1 

lo 1.01 
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CASE (3) 


2. The operand types ere: 


'• -type 

R -type 

riATRIX 

T 


3. If the L operand is an m x n matrix, 
then the result is an n x m matrix. 

4. If R is symbolically T, then transpose 
is indicated even if T is a declared 
data item. 


Examples: 

If M is a 2 x 3 matrix with M = fl.O 

12.0 


then M T 3 


1.0 

0 

.3.0 


2.0 

0 

4.0J 


0 3.0 

0 4.01 


if V is a 3-vector with V= fl.O" 

2.0 

13. Oj 

T 

then V is illegal bocause the L operand is not matrix tygT . 
The transpose of a vector is not needed in the HAL/S language. 


. < 


■I 


51 1 
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NOTE ON PRECISION CONVERSION 


It is possible that the precisions of the two operands may differ 
in any cf the operations described. In these cases, precision 
conversion usually takes place before the operation is executed. 
The rules under which it takes place are as follows: 


1. No precision conversion is possible in 

unary operations: transposition is 

considered a unary operation. 

2. Where an operation specifies type con- 
version from integer to single precision 
scalar, this conversion is carried out 
first. 

3. If only one operand is integer and no 
type conversion is implied , no precision 
conversion takes place. 

4. If both operands have the same precision, 
the result is of the same precision (even 
if not of the same type) . 

5. If the operands have mixed precision, the 
single precision operand is converted to 
double precision. Then rule 4 is applied. 
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7.2 


CHARACTER OPERATIONS 


There is only one character operation in HAL/S: concatenation 

of character strings. 


Symbol 

Purpose 

11 } 
CAT ' 

catenation 


CATENATION 


The utility of catenating character strings is obvious in 
the generation of output listings. The rules related to 
the catenation operation are as follows: 


Symbolic form: L ( | R 

CAT 

1. The L and R operands are not just 
restricted to character type: some 

degree of implicit type conversion 
is allowed. The following t^pes are 
legal. 


L-type 1 

R-type 

INTEGER ) 

(integer 

SCALAR > 

i SCALAR 

character) 

(character 


2. The rules for converting integer and 
scalar types to character type are to 
be found in Appendix 
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I 

I 

I 

I 

I 

I 

I 

I 

I 



I 


Examples : 

If C is a character item with C = 
I is integer with I = 10 
then 'TEN' ] | C s 'TEN UNITS' 

I | | C = * 10 UNITS ' 

and I | | I = '10 10' 


♦ 

i 
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7.3 BOOLEAN OPERATIONS 


Boolean operations are logical (binary) transformations on Boolean 
operands. HAL/S recognizes the following operations: 


Symbol 

Purpose 

AND I 

logical intersection 

l ) 

OR f 

logical conjunction 

NOT } 

logical complement 


COMPLEMENT 

The complement operation complements the logical value of a 
Boolean operand. It takes the following form. 

Symbolic form: " R 

NOT 

1. The R operand is of Boolean type. 


Example: 

If B is Boolean with B 5 TRUE 
then -B = FALSE 
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I CONJUNCTION 


The conjunction operation causes the logical values of two 
Boolean operands to be OR'ed together. 



Examples : 

If B is Boolean with B - FALSE 
then B|B = FALSE 
B | TRUE = TRUE 


>. 

% 



* 

i 

4 



% 
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INTERSECTION 


The intersection operation causes the logical values of two 
Boolean operands to be AND'ed together. 


Symbolic form: ^ ^ 

1. The L and R operands are of Boolean type. 

2. The truth table for the resulting Boolean 
is as follows: 


T=TRUE 

F=FALSE 


T 

F 

R 

T 

T 

F 

F 

F 

F 


I 

I 

I 


1 


Examples: 

If B is Boolean with B = FALSE 
then B&TRUE - FALSE 
B&B = FALSE 


* 

l 


»i — rniro 
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7.4 


COMBINING OPERATIONS 8 PRECEDENCE 


It is obviously desirable to be able to corabine operations so 
as to create expressions of any required complexity. In combining 
operations, the following information is necessary: 

• The order in which operations are executed (the order 
of "precedence" ) ; 

• the way in which the precedence order can be overriden. 

ARITHMETIC AND CHARACTER PRECEDENCE 


The precedence of HAL/S operations on arithmetic and character 
data types are shown in the following table: 


Symbol 

Precedence 

Purpose 

** 

FIRST 

1 

exponentiation, etc. 

(blank) 

2 

multiplication 

* 

3 

cross product 

• 

4 

dot product 

/ 

- 

division 

+ 

6 

addition 

- 

6 

subtraction, negation 

||, CAT 

7 

catenation 


T AST 



Two rules clarify and modify this information: 


I 

I 

I 


Sequences of operations of the same precedence are evaluated 
left to right, except for ** and /, which are evaluated right 
to left. 

Sequences of multiplications are sometimes reordered to minimize 
the number of elemental products required. 
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Examples: 

In the following expression, the numbered pointers show 
the order of execution of operations: 


.2 


1 RESULT OF STEP ' | |N| | ' IS ' | |S1+S2 * - V1.V2/2/2 

J) (l) J) )r> (L (4 In 


BOOLEAN PRECEDENCE 


The precedence rules for Boolean operations are stated separately 
because there are no implicit conversions causing interaction 
with arithmetic and character operations. 


Symbol 

Precedence 

Purpose 


FIRST 


NOT 

1 

complement 

&, AND 

2 

intersection 

1, OR 

3 

LAST 

conjunction 


Sequences of operations of the same precedence are evaluated 
left to right. 

Examples: 

In the following expression, the numbered pointers show the 
order of execution of operations: 

"B1 

i 
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I 

I 

I 

I 

l 


OVERRIDING PRECEDENCE ORDER 

In HAL/S/ the order of precedence can be overriden at will by 
the use of parentheses, nested to any arbitrary depth. 

Examples : 

In the following Boolean expression, 

BllB2 & B3|B4 & B5 


(6 © k> 


parentheses may change the precedence order as shown: 
(Bl | B2) & ( (B3|B4) & B5) 


d) © d) 


In the following arithmetic expression, 

SI + S2 2 + S3/2 

© (Lb 

parentheses may change the precedence order as shown: 
((SI + S2) 2 + S3)/2 


i /k * 

© ®® ® 


\ 
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7.5 


SOME EXPLICIT CONVERSIONS 


I 

I 


As evidenced in Section 7, there are few implicit type conversions 1 

in the HAL/S language. However, there is a comprehensive range of W 

explicit conversions, some of which are now described. 

PRECISION CONVERSION * 

Any arithmetic expression may have its precision explicitly 8 

changed as follows: 

I 

1 

Example : J 

If A anl B are single precision, then the result of . 

(A + B) § DOUBLE 

is double precision, the type remaining unchanged. 1 
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(<expression » 0 DOUBLE 
(<expression>) e smGLE 

1. In the first form, if <expression> is 

a single precision arithmetic precision, 
it is converted to double precision. 

If it is already double precision, the 
conversion has no effect. 

2. In the second form, if <expression> is 

a double precision arithmetic expression 
it is rounded to single precision. If 
it is already single precision, the 
conversion has no effect. 




I 


VECTOR CONVERSION 


A vector can be synthe ized from a list of scalar or integer 
expressions using the construct shown in the following table: 


VECTOR^ (<exp>, <exp> ) 

1. The subscript number n specifies the 
length of the vector to be created, and 
lies in the range 1 < n £ 16*. 

2. If n is omitted the resulting vector is 
assumed to be of length 3. 

3. Each <exp> is a scalar or integer 
expression. 

4 . The number of expressions in the list 
must match the implicit or explicit 
result length. 

5. The result of the above conversion is in 
single precision. 

6. The matrix is assembled row by row from 
the list. 


Examples : 

VECTORU, 2 , 3) 


creates a 3-vector with value fll 

\i 


* This vaU~ may be implementation dependent. See Appendix 
for exceptions. 
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if S is a scalar with S =0.5 then 


VECTOR^ (S, S 2 , S+l , 0) 


creates a 4 -vector with value 


'0.5 

0.25 

1.5 

.0 


I 


Note that even if the arguments are double precision the result 
is in single precision. To specify double precision in a vector 
conversion, the following modified form is used: 


VECT0R « double, n (<exp> ' <exp> •••• ) 

1. The meanings of <exp> and n are as before. 

2. If n is not specified, the preceding comma 
is also omitted. 

Examples: 

VECT0R « DOUBLE 11 ' 2 > 3) 

creates a double precision l-zc-^cc.' with value 
VECT0R e DOUBLE, * (1 ' 2 ' ? " 4> 

creates a double precision 4-vector with value 

] 
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MATRIX CONVERSION 


There exists a method of synthesizing a matrix from a list of 
integer or scalar expressions analogous to the vector conversion 
described: 


MATRIX^ n ( < exp>, <exp>, ) 

1. The subscript numbers m, n specify the 
row and column dimensions of the matrix 
to be created, and must lie in the range 
1 < m, n 16*. 

2. The subscript may be omitted, in which 
care the resulting matrix is assumed to 
be 3 by J. 

3. Each <exp> is a scalar or integer 
expression. 

4. The number of expressions must match the 
total number of elements in the resulting 
matrix. 

5. The result of the above conversion is in 
single precision. 


* This value may be 'up lamentation deponen t. See Appendix 
for exceptions. 
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Examples: 


MATRIX (1, 2, 3, 4, 5, 6, 7, 8, 9) 

creates a 3 x 3 matrix with value [2 2 3 

4 5 6 

17 8 9. 

MATRIX. _(1.5, 0, 0, 0, 0.5, 0! 

creates a 2 x i matrix with value [1.5 0 0] 

10 0.5 Ol 

Note the order of assembly in each case. 


As in the case of vector conversion, a modified form is required 
if the result is to be in double precision: 


MA ' rMX « DOUBLE, », n (<ex P > » <**P> I 

1; The meanings of m, n and <exp> are as 
before. 

2. If the dimension subscript is omitted, the 
preceding comma is also omitted. 


t 

! 


Examples : 

MATRIX 


\ 


a, 2, 3, 4, 5, 6, 7, 3, 9) 


9 DOUBLE 

creates a double precision 3x3 matrix with valua 


“ATRW* double, 2, 3 (1 * 5 ' °* °' °* °* 5 ' °> 

creates a double precision 2x3 matrix with value [1.5 0 0] 

l h 0.5 0] 



1 

12 3 

1 

4 5 6 


.7 8 9J 

1 


1 

1 
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o rrn 


The explicit conversions descxibed 
are those most commonly required for 
numerical analysis. However, HAL/S 
contains many other explicit con- 
version function forms corresponding 
to conversions between most data types. 
See: tbd. 
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7.6 


SUMMARY 


Section 7 has described how HAL/S expressions are synthesized 
from operands and operators, and in what order such expressions 
are executed. Expressions, particularly of integer and scalar 
type, form parts of many HAL/S language constructs. Section 6 
referred many times to the use of integer expressions in sub- 
scripting. 

Section 8 describes the assignment statement, which causes the 
result of an expression to be stored in some data item or 
items. 
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8. ASSIGNMENTS (TBD) 

8.1 ARITHMETIC ASSIGNMENTS (TBD) 

8.2 CHARACTER ASSIGNMENTS (TBD) 

8.3 BOOLEAN ASSIGNMENTS (TBD) 

8.4 SUMMARY (TBD) 
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9, CONDITIONAL STATEMENTS AND BRANCHES 


Section 9 is primarily concerned with the HAL/S conditional 
statement, by which other executable statements may be 
conditionally executed (or by which their execution may be 
conditionally avoided). Together with statement groups, 
which will be described in Section 10, they form a crucially 
important part of the HAL/S language. 

The HAL/S language encourages programmers to avoid using 
GO TO statements to cause branches in execution. Their 
total elimination, however, is not desirable. This 
Section therefore also describes the HAL/S GO TO state- 
ment, and statement labels, which are their destinations. 
Statement labels are, in addition, needed for other constructs 
to be described in Section 10. 


9.1 THE CONDITIONAL STATEMENT 


In HAL/S, the simple version of the conditional statement is 
an "IF clause" containing an expression evaluable as either 
TRUE or FALSE, followed by a "true part" which is executed 
only if the IF clause is TRUE. The simple version may be 
augmented by an "ELSE part" which is executed only if the 
IF clause is FALSE. 


9-1 


iMTcnMCTDirc imporfopaTFO • 701 CONCORD AVENUE • CAMBRIDGE, MASSACHUSETTS 02138 • (617) 661-1840 



SIMPLE IF STATEMENT 


The form of the simple version is: 


T 
! 
I 

? 

i 

i 

i 

i 

i 
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! IF <exp> THEN <statement>; 

i 

1. <exp> is an expression which is 
evaluable as either TRUE or 
FALSE. It may be either a 
BOOLEAN expression or a rela- 
tional expression (these are 
described in Section 9.2). 

2. <statement> constitutes the true 
part of the conditional statement. 
Except as noted in Rule 3 it may 
be any executable statement, 
either simple or compound . 

3. <statement> may not possess a 
label, and may not be another 
conditional statement. 

4. If <exp> is FALSE, execution proceeds 
to the next statement. If TRUE, 
<statement> is executed first. 




I 


Examples : 

I 

I IF B|C THEN X = 0; 


X is set to 0 if either B or C or both is true: 
the flow diagram for these events is: 



• . 

, IF B|c THEN DO; 

I X * X - 1; 

I Y » Y + 1; 

| END; 

The true part is a compound statement containing 
two assignments. 

! IF B THEN [IF _C THEN D « Oj ; 

* Illegal because true part is a conditional statement, 

in violation of Rule 3. 
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AUGMENTED IF STATEMENT 


I *' 

The IF statement when augmented with an ELSE part takes I 

the form: 


, IF <exp> THEN <statement>; 

I ELSE <else stmt>; 

1. The form of the IF clause and 
true part are the same as in 
the simple conditional state- 
ment. 

2. <else stmt> constitutes the 
ELSE part of the conditional 
statement. It may be any 

un label led executable state- 
ment either simple or compound. 

3. If <exp> is FALSE, execution 
proceeds to the next statement 
via <else stmt>. If TRUE, it 
proceeds to the next statement 
via < statement >. 


I 


i 


a 


r»- 


H" it 


-tm *ur* u — 
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I 
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I 

I 


Examples : 

] IF B|C THEN X = 0; 

I ELSE X = 1; 

I 

X is set to 0 if B or C or both is true, 
otherwise X is set to 1. The flow diagram 
for these events is: 



I 

I If B|c THEN DO; 

, X - 1 ; 

I Y = 2 ; 

| END; 
i ELSE DO; 

X - 2; 

1 Y - 1 ; 

| END; 

Here, both true and ELSE parts are compound 
statements containing two assignments each. 
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IF B THEN X = 0; 

ELSE II C THEN X = 1; 
Y = 2; 


This is legal: the ELSE part of a conditional 

statement may itself be another conditional 
statement: the flow diagram for these events 

is: 
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9.2 


RELATIONAL EXPRESSIONS 


As was stated in Section 9.1, there are two valid forms 
of expression in an I r clause, BOOLEAN, and relational. 
BOOLEAN expressions were described in Section 7; relational 
expressions only appear in a limited number of HAL/S 
constructs, among them conditional statements, and are now 
to be described. 

The simplest form of a relational expression is merely a 
comparison between two like quantities. The result is 
either TRUE or FALSE. More complex forms of relational 
expressions result from combining comparisons with the 
BOOLEAN operators &, |, and 


COMPARATIVE OPERATIONS 


HAL/S recognizes the following comparative operators: 


Symbol 

Purpose 

Class 

> 

greater than 


< 

less them 


<» 

less them or equals 


NOT > 
-• > 

| not greater than 

I 

> - 

greater than or equalr 


NOT < 
-» < 

| not less than 


- 

i 

equals 

II 

NOT - 

^ m 

| not equals 
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The operands of comparative operations may, in general, 
be expressions of any of the types described in Sectic-A 7. 
Depending on the type of operand, the operators may be 
restricted to Class II only, or may be either Class I or 
Class II. 


• CLASS II ONLY 



Symbolic form: 

L NOT = R 
— » 

1. 

Legal combinations, of data types 


are indicated by the following 
table : 


l-type 

R-type 


VECTOR 

VECTOR 


MATRIX 

MATRIX 


BOOLEAN 

BOOLEAN 


CHARACTER 

CHARACTER 

2. 

Comparison of vector and matrix 


operands implies element—by— element 
comparison. 

3. 

The operands in 

a vector comparison 


must be the same length « 1 

4. 

The operands in 

a matrix comparison 


must have the same row and column 
dimensions. 
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Examples : 


If STRING is character type with 

STRING = 'ABC ’ 

STRING = ' PQR' 
is FALSE. 

STRING = 'ABC ' 

is FALSE - character strings must be of the same 
length. 

If V, W are 3-vectors with 


V = 

-1* 

I 

VI = 

1 


-1 



1 


. 2. 



.-2. 


then V = VI is FALSE, 

vi - v * 2 V is TRUE. 

If further V2 is a 2-vector with V2 = £lj 

the,' VI = V2 is illegal because of length mismatch, 
but V1 1 TQ 2 * V2 is TRUE. 
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• CLASS I AND CLASS 1 1 


I 

I 

« 


1. 


2. 


Symbolic form: 1 


> 

< 

<= 

NOT > 
-> R 

NOT < 
< 

NOT » 


Legal combinations of data types are 
indicated by the following table: 


L-type 

R-type 

' INTEGER 

INTEGER 

SCALAR 

SCALAR 


In a mixed integer- scalar operation, 
the integer operand is converted to 
scalar before the comparison takes 
place. 


Examples: 

If I is an integer with 125 

then I - 5 is TRUE 
I < A is FALSE 
I >- 5 is TRUE 
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NOTE ON PRECISION CONVERSION 


It. is possible that the precisions of the two operands 
may differ in any of the operations described. In these 
cases, precision conversion takes place before ths opera- 
tion is executed. The rules under which it takes place 
are as follows: 


1. Where an operation specifies type 
conversion from integer to single 
precision scalar, this conversion 
is carried out first. 

2. If only one operand is integer and 
no type conversion is implied , no 
precision conversion takes place. 

3. If both operands have the same 
precision, the result is of the 
same precision (even if not of 
the same type) . 

4. If the operands have mixed precision, 
the single precision operand is 
converted to double precision. Then 
rule 3 is applied. 
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COMBINING COMPARATIVE OPERATIONS 


Comparative operations may be combine^ as if they were 
BOOLEAN operands, using the rules for" Boolean operations 
described in Section 7. It is important to note however, 
that comparative operations are not BOOLEAN operands in 
the sense that they can be mixed with actual BOOLEAN data 
items . 

• Boolean expressions may contain no comparative operations. 

• Relational expressions may contain no Boolean operands. 


Examples : 

If VI, V2 are 3-vectors with 


= 

1 

, V2 = 

■* • 
3 


2 


2 


3 


1 


- - 


• « 


and C is character with C = 'ABC' 
then 

VI = V2|C 1 = 'A' is TRUE 

VI = V2 & C 1 = 'A 1 is FALSE j 

If B is Boolea; then 

'i 

B|V1 = V2 is illegal 1 


) 
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PRECEDENCE 


The following table shows the precedence of operations 
involved in a relational expression: 
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Example: 


I 
I 

In the following expression, the numbered pointers show | 

the order of execution of operations: 



Section 9.2 ends with some more examples designed to 
clarify the foregoing. 


Examples: 

Let V be a 3-vector with V = 


I 


1 
2 
3 

L J 


I IF V = 1 & V =2 THEN V = 0; 
S 1 ; 2 3 


| IF V > 0 | V <0 THEN V = 0; 
I S 3 2 


The first statement will cause V, to be set to 
zero since both comparisons are TRUE. Then 


V E 1 
2 
0 


In the second statement, neither comparison in the 
relational expression is true. Hence, the "true 
part" is not executed and finally 


» ■ 

V 5 1 

2 
0 


as before. 


-1-i-m t» i 
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9.3 LABELS AND BRANCHES 


In HAL/S, there are two entities connected with the 
branching operation: the GO TO statement, which, when 

executed causes the branch; and a "statement label" 
which is the destination of sue h a branch. HAL/S 
also uses statement labels for sther purposes, which 
will become clear in Section If . 


LABELS 


Labels are names chosen by the programmer and attached to 
statements. More than one label may be attached to a 
statement. The way of attaching a single label to a 
statement is as follows: 


j <l^bel>: <statement>; 

1. < statement > is any executable 
; statement or statement group 

(see Section 10) , with two 
exceptions. 

2. <statement> may not be the 
"true part" or "ELSE part" of 
a conditional statement. 

3. <label> is a user-defined 
identifier name (see Section 
2 . 2 ) . 
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I 


Examples: 

[ ONE: X = X + 1; 

I TWO: Y = 0; 

i 

The following are illegal since they violate 
Rule 2 : 

I 

| IF X = 0 THEN ONE: Y = 0; 

| IF X = 0 THEN X = 1; 

| ELSE TWO : X = 3 ; 

However, the conditional statement itself may 
be labelled: 

I 

I THREE: IF X = 0 THEN Y = 1; 

I 

If more than one label is required, then they follow each 
other in sequence. 

Example : 

) 

I ONE: TWO: THREE: X = X + 1; 

I 
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GO TO STATEMENT 


The GO TO statement specifies the label to which 
execution branches: it takes the form: 


! GO TO <label>; 

I 

1. <label> is a label attached to 

some statement to which execution 
is to branch. 


Examples: 

I 

j GO TO ONE; 

The GO TO statement itself may be labelled: 

I 

• TWO: GO TO THREE; 

I 

It is important to note that HAL/S places relatively 
severe restrictions on the placement of GO TO 
statements and where they may cause execution to 
branch to. Section 1.3 described this on the abstract 
level, and Section 10 further discusses it. in connection 
with statement groups. 
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ELIMINATING GO TO STATEMENTS 


The Guide has stressed throughout that, according to structured 
programming principles, GO TO statements are inherently un- 
desirable because they tend to disguise the program's flow 
of execution. 

It will be found that HAL/S contains a sufficient number of 
other constructs to allow GO TO statements to be substantially 
eliminated from a program. Following is an example showing 
the elimination of GO TO statements. 

Examples : 

• IF X > 1.5 THEN GO TO ALPHA; 

I IF X < 1.5 THEN TO TO BETA; 

I Y = Y + 1; 

1 GO TO GAMMA; 

I ALPHA; X - X - 0.05; 

| GO TO GAMMA; 

BETA; X « X + 0.05; 

I GAMMA: . 


This example is programmed in HAL/S in the simplest way 
(possibly having been translated from Fortran or an assembly 
language) . The profusion of GO TO statements disguises the 
simple flow of execution, which is interpreted by the following 
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The same algorithm is more clearly programmed 
as follows: 


IF X 

> 

1.5 

THEN 

X 

= 

X - 

0.05; 

ELSE 

IF X 

< 

1.5 

THEN 

X 

=5 

X + 

0.05; 

ELSE 

Y 


Y + 

1; 


9.4 SUMMARY 

Section 9 has described conditional statements, labels, 

GO TO statements, and the ways in which they affect the 
flow of execution in a HAL/S program. Some attempt has 
been made to point out both the good and the bad ways 
of using these statements. Section 10 goes on to describe 
statement groups and how the usage of the constructs described 
in Sections 9 and 10 are very often interrelated in well- 
designed HAL/S programs. 
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10. STATEMENT GROUPS 


Section 1.3 of the Guide introduced, on an abstract level, 
the idea of "statement groups", which could be treated as 
if they were simple executable statements, and could be 
nested one inside the other. The power of such a facility 
can be seen, for example, when it is used in conjunction 
with the conditional statement: (this is demonstrated later 
in Section 10.1). 

There is, in fact, a second, equally important reason for 
grouping statements in HAL/S: the execution of such groups 

can be controlled in a variety of ways. If no explicit 
specification is made, the sequence of statements is executed 
once only. By explicit specification: 

• the sequence may be repetitively executed until some 
condition is satisfied; 

• a single executable statement (or nest statement group) 
of the group, selectable at execution time, may be 
executed . 

0 

Section 10 explains in detail how statements are grouped, 
and how execution control of the groups is specified. 


10.1 DELIMITING STATEMENT GROUPS 


In HAL /S, groups of statements are said to be "well-bracketed": 
they are delimited explicitly by opening and closing statements 
which are themselves considered executable. 
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THE DO STATEMENT 


Every statement group is opened with a "DO" statement which 
is also used to specify control of execution within the group. 
It takes the generic form: 




J DO <control>; 

i 

<control> is a construct to be 
described. It specifies the manner 
in which the sequence of statements 
is to be executed. 


i. 

1 

2. 

<control> is optional. If it is 
absent, the sequence of statements 


is executed in its natural order* 
once only. 

i 

3. 

The DO statement is executable in 

9 


that it may be labelled according 
to tie Rules of Section 9. 


The particular instances of DO statements will be explained 
in Section 10.2. 




* The * natural order" of execution was explained in 
Section 3.3. 
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THE END STATEMENT 


Every statement group is closed with an END statement: 


l 

J END <label>; 

l 

1. The END statement is executable 

in that it may be labelled according 
to the Rules of Section 9. 

2. <label> is optional: if present, 

the opening DO statement of the group 
must be labelled with 'labei>. 


The label specification in an END statement is never 
functio na lly necessary in HAL/S. However, it should be 
regardecT as good programming practice because it 
facilitates cross-checking by the compiler. 


Jx ample s: 


Two instances of statement groups are shown below. 
Even though details of execution control have not 
yet been explained, the form of the construct should 
be clear. 


i 

i 

• 

I 

ft 

ft 

• 

ft 

ft 

ft 

• 

I 


S 


DO WHILE I > 0* 
I ■ I - 1; 

A - 0) 

I 

END; 


I 


opening DO statement 
group of statements 
closing END statement 


• 

I 

ft 

I 

• 

ft 

i 

l 


8 


FIX: 


DO FOR I « 1,25,16,2} 
A * -A } 

I I 
END FIX} 


| one statement in group 

} label specification in 
END matches label of DO 
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The folicv/ir. i examples show the importance of being able 
to group statements together for use in conjunction with a 
conditional statement. 

i 

I IF S = 0 THEN 1 - 2 ; 

\ C = ' RESET VALUE OF I TO 1 | 1 1 ; 


It is required to conditionally 
execute both assignments: one 

solution is - 


IF S -■ C THEN GO TO NOSET; 

1 = 2 ; 

C - 'RESET VALUE OF I TO ' | |l; 
NOSET: 


This solution is error prone and 
not in accordance with structured 
programming concepts: a better 

solution is - 

IP S « 0 THEN DO; 

I - 2; 

C - 'RESET VALUE OF I TO ' | |l; 


The whole of the group enclosed 
by DO ... END is subject to 
conditional execution. 
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REPETITIVE EXECUTION OF STATEMENT GROUPS 


The sequence of statements in a group can be executed 
repetitively until some condition is satisfied. In 
this section, two basic forms of DO tatement causing 
repetitive execution are described: 

• The DO WHILE statement, in which execution is 
repeated while a relational or BOOLEAN expression 
remains TRUE in value; 

• The DO FOR statement, in which the sequence is 
executed once for each of a set of assigned values 
of a "control variable". 


THE DO WHILE STATEMENT 

0 

The form of the DO WHILE statement is: 


I DO WHILE <cond>; 

1 

t 

1. <cond> is any relational or 
BOOLEAN expression. It is 
evaluated prior to each cycle 
of execution of the statement 
sequence in the group. 

2. The next cycle of execution of 
the group proceeds if the value 
of <cond> is TRUE. 

3. If the value of <cond> io FALSE, 
the stopping condition is satis- 
fied. Execution proceeds to the 
statement following the END state- 
ment of the group. 




Examples : 


l I = 9; 

; DO WHILE I > 0; 
! 1=1-2; 

; END; 


Here the group is executed 5 times, after which 
the value of I is -1. In flow diagram form, 
the sequence of events is: 


I 

I 

I 

I 

I 

I 



It is possible for a group never to be executed: 


. DO WHILE FALSE; 

I 1*1-2; 

| END; 
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I 


I 


It is also possible for a group to be executed 
forever : 

I I = 0; 

! DO WHILE TRUE; 

. 1 = 1-2; 

; END; 

i ♦ 

i • 

• 

I 

Normally in this case, the programmer would insert 
statements in the group removing this possibility: 

I 

1 I = 9? 

' DO WHILE TRUE; 

! 1=1-2; 

i IF I < 0 THEN GO TO ALLJDONE; 

! END; 

! • 


There exists a variant of 
the DO WHILE statement 
called the DO UNTIL state- 
ment. Here execution of 
the group is assured at least 
once, whatever the value of 
the controlling expression. 

See: (tbd) . ' 

\ 
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THE DO FOR STATEMENT 


The most widely used form of the DO FOR statement is: 


; DO FOR <var> = <init> TO <final> BY <inc>; 

I 

1. <var> is an unarra^ed INTEGER or SCALAR 
data item (it may be subscripted if 
required) . It is called the "control 
variable" of the DO FOR statement. 

2. <init>, <final> and <inc> are integer 
or scalar expressions: 

• <init> is the initial value 
assigned to <var>. 

• <inc> is the amount by which 
<var> is incremented on each 
cycle of execution of the sequence 
of statements in the group. 

• < final > is the value against which 
<var> is tested at the start of 
every cycle to determine if the 
stopping condition is satsified. 

All three expressions are evaluated 
once prior to the first cycle of 
execution. 

3. The stopping condition is met when 
the value of <var> lies outside the 
range bounded by <init> and *final>. 

4. <inc> may be either positive or 
negative . The phrase 

BY <inc> 

is optional. If omitted, the implied 
increment is +1. 
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Examples : 


DO FOR I = 1 TO 10; 
X = I; 

S I 

END; 


Here the group is executed 10 times. I is 
initially 1, and increments each time until 
10 is reached. At the end of execution of 
the group, the value of I is 11. In flow 
diagram form, the sequence of events is; 
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; 1 = 7 ; 

• DO FOR I = I + 5 10 I - 3 BY -2; 

• X = X + I; 

I END; 


This example demonstrates some of the subtleties 
of the DO FOR statement. The initial and final 
values are precomputed as 12 and 4 respectively. 
Then I is reused as the control variable: the 

group is executed 5 times, and after the last 
cycle of execution, I retains the value 2. 


i 


V 

£ 

f 

i 



i* - ' 


Care must be taken if the 
control variable is integer 
and the range expressions are 
scalar: rounding occurs 

during assignment of values 
it. such cases. 

This DO FOR statement may 
possess a WHILE or UNTIL 
clause which furnishes a 
supplementary stepping con- 
dition. 

See (tbd) . 
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The DO FOR statement has a second form which is used if 
the values of the control variable do not form a regular 
progression: 


1 

i DO FOR <var> = <exp>, <exp>, ... <exp>; 

i 

1. <var> is the control variable as before. 

2. Each <exp> is an integer or scalar 
expression. Values of the <exp>'s are 
assigned to <var> in turn prior to the 
execution of each cycle, on a left-to- 
right basis. 

3. Each <exp> is evaluated immediately prior 
to the cycle of execution in which it 
will be used. 


Examples : 


DO FOR I = 17,5,12,4; 

X = I; 

S I 

END; 

Here, I takes the successive values 17, 5, 12, and 4. 
After the end of the last cycle, the value of I remains 
at 4. 


1 = 7; 

DO FOR 1*1+5, 1+3, I + 1, I - 1, I - 3; 

X » X + I; 

END; 

Superficially, this example looks like a different 
way of expressing the second example for the first 
form of DO FOR statement: 

1-7; 

DO FOR 1*1+5 TO 1-3 BY -2; 

X * X + I; 

END; 
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I 

1 

I 

fa 

However, the successive values of I in the new 
form (by Rule 3) are: 

12, 15, 16, 15, 12 

as opposed to 

12, 10, 8, 6, 4 

in the old form. 




'* v 


a 


SW i 

I 


10.3 SELECTIVE EXECUTION OF STATEMENT GROUPS 


One statement of a group may be selected for execution 
by means of the DO CASE statement. The form of the 
DO CASE statement is: 




The flexibility of a DO CASE statement is understood when 
it is realized that the selected statement may be a 
compound statement (i.e. it may itself be a statement 
group) . 



Example : 


I = 3; 


DO CASE I; 



X « 4; 

case 

1 

X « 3; 

case 

2 

DO; 

) 


X - 7; 

( 


y - 3; 

) case 

3 

END; 

) 


X • 1; 

case 

4 

X * 0; 

case 

5 


END; 


I 
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T 




I 


I 


Execution results in the third statement being 
scheduled for execution, and the following 
values being set: 

X = 7, Y = 3 


0 


I 

f 

An ELSE clause may be added 

to the DO CASE statement which j 

is executed instead of an 
error being signalled, if the 

value of the case variable is *' 

outside the legal range for the j 

statement group. 

See: (tbd) . 


4 
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10.4 BRANCHING IN STATEMENT GROUPS 


Any statement group may be branched out of by executing 
a GO TO statement. In those cases where the group is 
being respectively executed, execution obviously ceases 
before the stopping criterion is satisfied. Because GO TO 
statements are viewed unfavorably from the standpoint of 
structured programming, HAL/S possesses two statements 
expressly for executing controlled branches in statement 
groups . 

• The EXIT statement is, in effect, a controlled branch 
out of a statement group. 

• The REPEAT statement only applies to statement groups 
executed repetitively, and is a controlled branch back 
to the beg inning of the group. 


THE EXIT STATEMENT 


The simplest form o£ the EXIT statement is: 


; : EXIT; 

i 

i 

1. Its execution causes an immediate 
'branch out of the in nermost state- 
ment group in whicTT it is enclosed. 

2. Execution is directed to the first 
statement following the END of the 
group branched out of. 
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Examples . 


DO: 

X = 1; 

Y = 2; 

IF Z = 3 THEN EXIT; 
Z = 4; 

END; 

X = X + 1 


Arrow shows branch in execution if Z s 3 



DO WHILE X > 0; 

X — X - 1; 

IF X > 2 THEN DO; 

IF Y = 3 THEN EXIT; 



Arrow shows branch in execution if Y = 3: execution 

branches to end, but not out of DO WHILE group. 


There exists a second form of the EXIT statement to allow branches 
out of other than the innermost statement group: 
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I 

I 

I 


EXIT <label>; 


Its execution causes a branch out 
of the enclosing statement group 
whose DO statement possesses the 
label <label>. 

Execution is directed to the first 
statement after the END of the group 
branched out of. 


Example : 


if 

■X 

1 

\ 




H 


\ 

! 

I 

I 

I 

I 

I 

I 

I 

I 


ONE; 


DO WHILE X > 0; 

X = x — 1 ; 

DO FOR I = 1 TO 10; 

A ■ A + X; 

I I 

IF X « I THEN EXIT ONE; 



The first EXIT statement causes a branch out of the 
outer group rather than the inner, by virtue of its 
label. 
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THE REPEAT STATEMENT 




The simplest form of the REPEAT statement is; 


! REPEAT; 

l 

1. It must be enclosed in a DO FOR 
or DO WHILE group. 

2. Its execution causes an immediate 
branch to the beginning of the 
innermost enclosing DO FOR or 

DO WHILE group. 

3. The next cycle of execution of 
the group then starts (unless 

of course the stopping condition 
is satisified) . 


Examples : 


DO WHILE 
X - X 
IF X < 

Y ' 
IF Y 

. END; 

I END; 


4 THEN DO; 

Y + X; A 

1 THEN REPEAT; 


If Y 5 1 then a branch back to the beginning of the 
DO WHILE is made. Note that although the DO WHILE 
is not the innermost group, it is the innermcst 
repetitive group. 
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l 




I 


I 


i 


I 


♦ 


•r 


I X = 4; / 

; DO WHILE X > 1;<( 

' X = X - 1; v. ^ 

I IF X = 1 THEN REPEAT; 

! y = X; 

,S X 
I END; 

When X = 2 the REPEAT brancn is executed: 
a new cycle of execution does not begin 
however because the initial test shows that 
the stopping condition is satisfied. 

As with the EXIT statement, there exists a second form of 
the REPEAT statement allowing brancne-. back to the beginning 
of other than the innermost DO WHILE or DO FOR group: 



’i REPEAT < label >; 

1. Its execution causes, an immediate 
■> branch to the beginning of the 

enclosing DO FOR or DO WHILE 
group whose DO statement possesses 
the label < label >. 

2. The next cycle of execution of 
the group then starts (unless the 
stopping condition is satisfied) . 


V 


i 
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Example: 


* 


S 

S 

s 


ONE 



J 


END; 

END; 

2 = 0 ; 


t 


i 

* 

* 

I 


The second REPEAT statement restarts the outer DO FOR 
group rather than the inner DO WHILE by virtue of its label. 


j 


3 


t 


? 


I 

1 
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10.5 SUMMARY 


Section 10 has explained how statements may be grouped 
together into compound statements, cind how such groups 
nay be executed repetitively or selectively. 

Ax this point in the Guide, programs can be constructed 
using assignment statements, and controlling execution 
through conditional statements and statement groups. It 
remains in Part I to complete the description of basic HAL/S 
programming tools by discussing functions, procedures, and 
I/O. Section 11 describes how functions and procedures are 
defined and invoked. 


i 

l 

i 

I 

l 
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li. FUNCTIONS AND PROCEDURES (TBD) 


11.1 BLOCK DEFINITIONS (TBD) 

11.2 PARAMETER LISTS (TBD) 

11.3 PROCEDURE CALLING (TBD) 

11.4 FUNCTION INVOCATION (TBD) 

11.5 BUILT-IN FUNCTIONS (TBD) 

11.6 SUMMARY (TBD) 
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12. INPUT/OUTPUT STATEMENTS (TBD) 

12.1 THE READ STATEMENT (TBD) 

12.2 THE WRITE STATEMENT (TBD) 

12.3 SIMPLE I/O FORMAT CONTROL (TBD) 

12.4 SUMMARY (TBD) 


* 


I 

I 

I 

! 
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13. SUMMARY OF PART I (TBD) 
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